R/shiny.R

Defines functions runMDPlot runsccp

Documented in runMDPlot runsccp

#' Shiny application for Short-Chain Chlorinated Paraffins analysis
#' @export
runsccp <- function() {
        file <- system.file("shinyapps", "sccp",
                            package = "enviGCMS")
        if (file == "") {
                stop("Could not find directory. Try re-installing `enviGCMS`.",
                     call. = FALSE)
        }
        shiny::runApp(file)
}
#' Shiny application for interactive mass defect plots analysis
#' @export
runMDPlot <- function() {
        file <- system.file("shinyapps", "MDPlot.rmd",
                            package = "enviGCMS")
        if (file == "") {
                stop("Could not find directory. Try re-installing `enviGCMS`.",
                     call. = FALSE)
        }
        rmarkdown::run(file)
}

Try the enviGCMS package in your browser

Any scripts or data that you put into this service are public.

enviGCMS documentation built on Feb. 16, 2023, 8:08 p.m.