ses.mpd(samp, dis, null.model = c("taxa.labels","sample.pool", "phylogeny.pool",
"independentswap","trialswap"), runs = 999, iterations = 1000)
mpd
, randomizeSample
data(phylocom)
ses.mpd(phylocom$sample, cophenetic(phylocom$phylo),null.model="taxa.labels")
Run the code above in your browser using DataLab