Nothing
print.CV_Data <- function(x,...){
cat("\nContaining the data required in cross validation. \n");
cat("Number of bins:", x$stat$g,"\n");
cat("Ratio p:", x$p, "\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.