# NOT RUN {
# Computation of the cophenetic vector of trees
# entered in newick format:
cophen.vector("(1,2,3,4,5);")
cophen.vector("(1,(2,(3,(4,5))));")
# Computation of the cophenetic vector of trees
# entered as a phylo object:
require(ape)
random.tree = rtree(5,rooted=TRUE)
cophen.vector(random.tree)
# }
Run the code above in your browser using DataLab