Nothing
@PKGNAME@ <- local(get(load(system.file(file.path("extdata", "plethy_db.RData"), package="@PKGNAME@"))))
@PKGNAME@@db.name <- system.file(file.path("extdata", "@DB_NAME@"), package="@PKGNAME@")
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.