chronogram
computes a chronogram from a phylogram by applying the NPRS
(nonparametric rate smoothing) algorithm described in Sanderson (1997).chronogram(phy, scale = 1, expo = 2, minEdgeLength = 1e-06)
"phylo"
), where the branch lengths are measured in substitutions.chronogram
returns an object of class "phylo"
. The branch lengths of this
tree will be clock-like and scaled so that the root node has age 1 (or the value
set by the option scale
ratogram
, NPRS.criterion
.library(ape)
# 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 chronogram
chrono.plants <- chronogram(tree.landplants)
# plot and write to file
plot(chrono.plants, label.offset = 0.001)
write.tree(chrono.plants, file = "chronogram.phy")
# value of NPRS function for our estimated chronogram
NPRS.criterion(tree.landplants, chrono.plants)
Run the code above in your browser using DataLab