Preparing for the tree plot. Only for internal use.
treepl(xy, node, erase = FALSE, ...)
xy
node
erase
...
Adapted from package "tree".
Badih Ghattas