Nothing
##################################################
### ClassU.R
setClass("ClassU",representation(u1="numeric",u2="numeric"))
setMethod("privateA","ClassU",function(object){object@u1^2})
setMethod("plot","ClassU",function(x,y){barplot(c(x@u1,x@u2))})
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.