# NOT RUN {
tokens <- matrix(c(0, 0, '0', 0, 0,
0, 0, '1', 0, 1,
0, 0, '1', 0, 1,
0, 0, '2', 0, 1,
1, 1, '-', 1, 0,
1, 1, '2', 1, '{01}'),
nrow = 6, ncol = 5, byrow = TRUE,
dimnames = list(
paste0("Taxon_", LETTERS[1:6]),
paste0("Char_", 1:5)))
MatrixToPhyDat(tokens)
# }
Run the code above in your browser using DataLab