data(manakinMolecular);
mknAdaA <-
hzar.doMolecularData1DPops(manakinMolecular$distance,
manakinMolecular$ada.A,
manakinMolecular$ada.nSamples);
mkn.AdaA.null <- hzar.dataGroup.null(mknAdaA)
hzar.plot.cline(mkn.AdaA.null);
Run the code above in your browser using DataLab