Nothing
library(RJSONIO)
str = "[ 1, {}, [1, 3, 5] ]"
v = fromJSON(str)
str1 = toJSON(v, collapse = " ")
stopifnot( any( duplicated( gsub("[[:space:]]", "", c(str, str1)))))
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.