Nothing
## ----setup, include = FALSE---------------------------------------------------
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>"
)
## ----waiter-code, eval=FALSE--------------------------------------------------
# library(shiny)
# library(shinydashboard)
# library(shinydashboardPlus)
# library(waiter)
# shinyApp(
# ui = dashboardPage(
# preloader = list(html = tagList(spin_1(), "Loading ..."), color = "#3c8dbc"),
# header = dashboardHeader(),
# sidebar = dashboardSidebar(),
# body = dashboardBody(
# actionButton("reload", "Reload")
# ),
# title = "Preloader"
# ),
# server = function(input, output, session) {
# # fake reload
# observeEvent(input$reload, {
# session$reload()
# })
# }
# )
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.