powered by
LinearParsimony(tree, tip_means, ...)
data(dentus) data(dentus.tree) mean.list <- dlply(dentus, .(species), numcolwise(mean)) names(mean.list) <- dentus.tree$tip.label evolqg:::LinearParsimony(dentus.tree, mean.list)
Run the code above in your browser using DataLab