Nothing
blocks = parse("../inst/samples/isim.R")
info = lapply(blocks, getInputs)
e = getVariableDepends("T", blocks, info)
lapply(e, eval)
# http://penguin.biostat.jhsph.edu/cpkg/6050/957b807d511ba76549c81b6e43a1c4477696/src/mcaps.R
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.