Nothing
library(RJSONIO)
con = textConnection(c("[[1,2,3,4],", "[5, 6, 7, 8]]"))
fromJSON(con)
con = file(system.file("sampleData", "usaPolygons.as", package = "RJSONIO"))
o = fromJSON(con)
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.