StringToPhyDat("-?01231230?-", c("Lion", "Gazelle"), byTaxon = TRUE)
# encodes the following matrix:
# Lion -?0123
# Gazelle 1230?-
fileName <- paste0(system.file(package = "TreeTools"),
"/extdata/input/dataset.nex")
phyDat <- ReadAsPhyDat(fileName)
PhyToString(phyDat, concatenate = FALSE)
Run the code above in your browser using DataLab