data('mite.data')
data('mite.tree')
data('data.taxonomy')
data('tree.taxonomy')
replacement.table <- ReplTable(tree = mite.tree, data.taxonomy = data.taxonomy,
tree.taxonomy = tree.taxonomy, levels=c("Genus", "Family"),
verbose=TRUE)
new.data <- MaxTips(mite.tree, mite.data, replacement.table)Run the code above in your browser using DataLab