Nothing
## ----eval=F-------------------------------------------------------------------
# # Inside ui_body.R or ui_sidebar.R
#
# #single download type
# downloadFileButton(id = "object_id1",
# downloadtypes = c("csv"),
# hovertext = "Button 1 Tooltip")
#
# #multiple download types
# downloadFileButton(id = "object_id2",
# downloadtypes = c("csv", "tsv"),
# hovertext = "Button 2 Tooltip")
## ----eval = F-----------------------------------------------------------------
# # Inside server_local.R
#
# #single download type
# downloadFile(id = "object_id1",
# logger = ss_userAction.Log,
# filenameroot = "mydownload1",
# datafxns = list(csv = mydatafxn1),
# aspectratio = 1)
#
# #multiple download types
# downloadFile(id = "object_id2",
# logger = ss_userAction.Log,
# filenameroot = "mytype2",
# datafxns = list(csv = mydatafxn1, xlsx = mydatafxn2),
# aspectratio = 1)
## ----eval=F-------------------------------------------------------------------
# library(periscope2)
#
# app_dir = tempdir()
# create_application(name = 'mysampleapp', location = app_dir, sample_app = TRUE)
# runApp(paste(app_dir, 'mysampleapp', sep = .Platform$file.sep))
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.