cladePar function

Utility function to plot.phylo