R/run_app.R

In epiforecasts/ForecastHubSubmissionApp: Shiny App to Preview Submissions to a Forecast Hub

#' Run shiny app
#'
#' @param ... only for future-proofing, ignored for now.
#'
#' @examples
#' if (interactive()) {
#'   run_app()
#' }
#' @export
run_app <- function(...) {
  shinyApp(
    ui = app_ui,
    server = app_server
  )
}