R/run_app.R

In ucsd-dsm/hbcd-tlfb: HBCD TLFB shiny app

#' Launch the app
#'
#' @param options Named options that should be passed to the run_app call.
#' @return
#' Open browser
#'
#' @export
#'
#' @import aws.s3 bslib glue dplyr reactable sass shiny shinyalert shinyWidgets timevis
#'

run_app <- function(options = list()) {
  app_directory <- system.file("hbcdtlfb", package = "hbcdtlfb")
  shiny::shinyAppDir(app_directory, options = options)
}