Nothing
plot.pco <- function(x, ...)
{
plot(as.dsvord(x,...))
cat("\nlabdsv 1.X ordinations are deprecated")
cat("\nUse 'x <- dsvord(x)' to update them\n\n")
}
plot.pca <- function(x, ...)
{
plot(as.dsvord(x,...))
cat("\nlabdsv 1.X ordinations are deprecated")
cat("\nUse 'x <- dsvord(x)' to update them\n\n")
}
plot.nmds <- function(x, ...)
{
plot(as.dsvord(x,...))
cat("\nlabdsv 1.X ordinations are deprecated")
cat("\nUse 'x <- dsvord(x)' to update them\n\n")
}
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.