# NOT RUN {
prep.ph.data ()
gs <- ph4.pdfuv.gset.cks (species, sepal.length)
ms <- ph4.qfuv.mset.el (trees2)
names (gs)
plot (gs)
plot (ms, nr=2, nc=2)
#distance matrix
pdist (gs)
plot (gs [[1]])
# }
Run the code above in your browser using DataLab