# get tree
data("landplants.newick") # example tree in NH format
tree.landplants <- read.tree(text = landplants.newick)
# plot tree
tree.landplants
plot(tree.landplants, label.offset = 0.001)
# estimate ratogram
rato.plants <- ratogram(tree.landplants)
# plot
plot(rato.plants, label.offset = 0.001)
Run the code above in your browser using DataCamp Workspace