#' Launch the app
#'
#' @param options Named options that should be passed to the run_app call.
#' @return
#' Open browser
#'
#' @export
#'
#' @import bslib ggplot2 sass shiny shinyWidgets tidyverse
#'
run_app <- function(options = list()) {
app_directory <- system.file("abcdmetrics", package = "abcdmetrics")
shiny::shinyAppDir(app_directory, options = options)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.