Nothing
mpp <- function(data, gif, marks, params, gmap, mmap, TT){
x <- list(data=data, gif=gif, marks=marks, params=params,
gmap=gmap, mmap=mmap, TT=TT)
class(x) <- "mpp"
return(x)
}
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.