powered by
data(primateDNA)
data(primateDNA) library(ape) primates.dist <- dist.dna(primateDNA, model = "F84") primates.cmd <- cmdscale(primates.dist) plot(primates.cmd)
Run the code above in your browser using DataLab