Nothing
print.mpmcorrelogram <-
function(x,...){
nclas <- length(x$clases)
print(data.frame(class = 1:nclas, distance.range=x$clases, rM = x$rM,
p =x$pvalues, p.Bonferroni=x$pval.Bonferroni,...))
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.