powered by
sub.tip.label(tree, dat)
library(ape) data(bird.families) tips <- bird.families$tip.label abr <- paste("fam",1:length(tips), sep = "") dat <- data.frame(tips, abr) ntree <- sub.tip.label(bird.families, dat)
Run the code above in your browser using DataLab