R/run_app.R

In qinzhu/VisCello.celegans: A visualization tool for single cell data of C.elegans embrogenesis

#' Launch App
#' @examples
#' cello()
#' @import shiny
#' @export
cello <- function(RStudio = F) {
    Sys.setenv("R_MAX_NUM_DLLS"=180)
    cat("Launching VisCello...")
    if(RStudio) {
        options(shiny.launch.browser = .rs.invokeShinyWindowViewer)
    }
    shiny::runApp(system.file("app", package='VisCello.celegans'))
}