Nothing
group <- NULL
for (i in 1:5) {
item <- gtkRadioMenuItem(group, "This is an example")
group <- item$getGroup()
if (i == 1)
item$setActive(TRUE)
}
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.