R/run_app.R

In BenjaminLouis/wimpress: Shiny module to prepare PDF template with CSS for Paged Media

#' run the Shiny Application
#'
#'
#' @export
#' @importFrom shiny shinyApp
#'
#' @examples
#'
#' if (interactive()) {
#'
#'   run_app()
#'
#' }
#'
run_app <- function() {
  shinyApp(ui = app_ui(), server = app_server)
}