R/launchApp.R

In d93espinoza/barcodetrackR: Functions for Analyzing Cellular Barcoding Data

#' Launch Barcode App
#'
#' Launches the Shiny Barcode App.
#'
#' @param x NULL
#' @return Page launching the Shiny Barcode App
#' @examples
#' if (interactive()) launchApp()
#' @export
launchApp <- function(x = NULL) {
    shiny::runApp(system.file("barcode_app", package = "barcodetrackR"))
}