Nothing
txt <- "The quick brown fox"
require(grid)
{if(interactive())
grid.newpage()
else
pdf("Examples/quickBrownFox2.pdf", width = 4, height=1.5)
}
pushViewport(viewport(gp = gpar(fontsize=18)))
grid.rect(width=unit(1, "strwidth", txt),
height=unit(1, "lines"), gp = gpar(lwd=2))
grid.text(txt)
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.