R/plot.anosim.R

"plot.anosim" <-
function (x, title=NULL, ...) 
{
   boxplot(x$dis.rank ~ x$class.vec, notch=TRUE, varwidth=TRUE, 
           ...)
   title(title)
   if (x$permutations) {
     pval <- format.pval(x$signif)
   } else {
     pval <- "not assessed"
   }
   mtext(paste("R = ", round(x$statistic, 3), ", ",
               "P = ", pval ), 3)
   invisible()
}

Try the vegan package in your browser

Any scripts or data that you put into this service are public.

vegan documentation built on May 2, 2019, 5:51 p.m.