Nothing
#' Run the Shiny Application
#'
#' @param ... A series of options to be used inside the app.
#'
#' @export
#' @importFrom shiny shinyApp
#' @importFrom golem with_golem_options
run_app <- function(...) {
Sys.setenv("LANGUAGE" = "ES")
if(toupper(.Platform$OS.type) != "WINDOWS") {
options(encoding = "utf8")
} else {
options(encoding = "UTF-8")
}
with_golem_options(
app = shinyApp(
ui = app_ui,
server = app_server,
options = list(launch.browser = T)
),
golem_opts = list(...)
)
}
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.