R/run_app.R

In Sage-Bionetworks/projectLive_CSBC: Live View of CSBC projects on Synapse

#' Run the Shiny Application
#' 
#' @export
#' @importFrom shiny shinyApp
#' @importFrom golem with_golem_options
#' @param ... arguments sent to golem_opts
run_app <- function(...) {
  with_golem_options(
    app = shinyApp(ui = app_ui, server = app_server), 
    golem_opts = list(...)
  )
}