R/runImport.R

Defines functions runImport

#' @export
runImport <- function() {
  appDir <- system.file(".", "import", package = "marxanui")
  if (appDir == "") {
    stop("Could not find app directory. Try re-installing `marxanui`.", call. = FALSE)
  }

  shiny::runApp(appDir, display.mode = "normal")
}
mattwatts/marxanui documentation built on May 21, 2019, 1:26 p.m.