Nothing
# function to summarize estimation results 2015-3-11 Thong Pham
summary.CV_Data <- function(object,...){
cat("\nContaining the data required in cross-validation. \n");
cat("Number of bins:", object$stat$g,"\n");
cat("Ratio p:", object$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.