init <- function(class_name, args){ if (missing(args)) self <- list() else self <- args class(self) <- c(class(self), class_name) return(self) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.