These functions return the depths or heights of nodes and tips.
node_depth_evonet(x, ...)
x | an object of class 'evonet' |
---|---|
... | Further arguments passed to or from other methods. |
a vector with the depth of the nodes
z <- ape::read.evonet(text = '((1,((2,(3,(4)Y#H1)g)e, (((Y#H1, 5)h,6)f)X#H2)c)a,((X#H2,7)d,8)b)r;') nd <- node_depth_evonet(z) z$edge.length <- nd[z$edge[,1]] - nd[z$edge[,2]] ggevonet(z)