Nothing
list2mmm <-
function(ret)
{
if (is.null(names(ret)))
names(ret) <- as.character(match.call(expand.dots = TRUE))[-1]
class(ret) <- "mmm"
ret
}
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.