# Create random 10-by-50 matrix:
character_taxon_matrix <- matrix(sample(c("0", "1", "0&1", NA, ""),
500,
replace = TRUE
),
nrow = 10, dimnames =
list(apply(matrix(sample(LETTERS, 40,
replace = TRUE
), nrow = 10), 1, paste,
collapse = ""
), c())
)
# Reformat for use elsewhere in Claddis:
build_cladistic_matrix(character_taxon_matrix)
Run the code above in your browser using DataLab