R/visustat_shiny.R

In grrchrr/VisuStatR: Visualizing Statistics on Images in R

#' @title visustat_shiny
#' @description With \code{visustat_shiny}, you can run all functionalities of the VisuStatR package in a shiny app.
#' @examples
#' \dontrun{
#' visustat_shiny()
#' }
#' @export
visustat_shiny <- function() {
  appDir <- system.file("app", ".", package = "VisuStatR")
  if (appDir == "") {
    stop("Could not find example directory. Try re-installing VisuStatR.", call. = FALSE)
  }
  shiny::runApp(appDir, display.mode = "normal")
}