Substitute the tip labels of a phylogenetic tree

Substitute the tip labels of a phylogenetic tree according to a reference data table.

sub.taxa.label(tree, dat)

Arguments

tree	Phylogenetic tree
dat	A dataframe with the first column the tip labels and the second column the new names.

Value

A Phylogenetic tree with the tip labels substituted

Author

Jinlong Zhang jinlongzhang01@gmail.com

See also

read.tree

Examples

library(ape)
data(bird.families)
tips <- bird.families$tip.label
abr <- paste("fam",1:length(tips), sep = "")
dat <- data.frame(tips, abr)
ntree <- sub.taxa.label(bird.families, dat)