R/runExample.R

In PatrickCoyle/analyzeGES: A package to assist with survey-weighted contingency table analysis for GES traffic accident data

#' Run shiny app for exploring correlations in GES data sets
#' @examples
#' runExample()
#' @export
runExample <- function() {
  appDir <- paste0(find.package("analyzeGES"), "/shiny-examples/shiny_app")
  shiny::runApp(appDir, display.mode = "normal")
}