data(geospiza)
edges(geospiza)
edgeOrder(geospiza)
geoPost <- reorder(geospiza, "postorder")
edgeOrder(geoPost)
## with a binary tree this should always be true
identical(!terminalEdges(geospiza), internalEdges(geospiza))
Run the code above in your browser using DataLab