Nothing
detail=function(x){
res <- list(x=x,
isS4=isS4(x),
is.object=is.object(x),
class=class(x),
attributes=attributes(x))
res
}
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.