Nothing
print.vmu <- function(x,...) {
cat("\nCall: ")
print(x$call)
cat("\n")
cat("Number of subjects: ", nrow(x$conf.row),"\n", sep = "")
cat("Number of objects: ", nrow(x$conf.col),"\n", sep = "")
cat("Number of dimensions: ", x$ndim, "\n", sep = "")
cat("Variance accounted for: ", round(x$VAF*100, 2), "%\n", sep = "")
cat("\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.