#example 1: simple
tree1<-rtree(50) #random tree with 50 leaves
tree2<-subtreeplot(tree1, wait=TRUE) # on exit, tree2 will be a subtree of tree1.
#example 1: simple
tree1<-rtree(50) #random tree with 50 leaves
tree2<-subtreeplot(tree1, wait=TRUE) # on exit, tree2 will be a subtree of tree1.