R/extra-shiny.R

In sketch: Interactive Sketches

Defines functions runShinyApp

Documented in runShinyApp

#' Run 'Shiny' Application
#'
#' @examples
#' \dontrun{
#' runShinyApp()
#' }
#'
#' @export
runShinyApp <- function() {
    dir <- system.file("sketch_editor", package = "sketch")  # nocov
    shiny::runApp(dir)  # nocov
}

Try the sketch package in your browser