R/shinyhelper_demo.R

In shinyhelper: Easily Add Markdown Help Files to 'shiny' App Elements

#' Launch the Example App
#' 
#' An example app demonstrating the use of the \code{shinyhelper} package.
#' 
#' @export
#' 
#' @examples 
#' \dontrun{
#' if (interactive()) {
#'   shinyhelper_demo()
#' }
#' }
#' 
shinyhelper_demo <- function() {
  
  if (!requireNamespace(package = "shinyhelper")) {
    message("Package 'shinyhelper' is required to run this function")
  }
  
  shiny::runApp(system.file("example", package = "shinyhelper", mustWork = TRUE))
}