inst/shiny/infercnvApp.R

#' Run infercnv shiny app
#'
#' This function is used to run the infercnv app. 
#'
#' @return The Shiny App Runs 
#' @export
#' @examples
#' if(interactive()){
#'   infercnvApp()
#' }
#'

infercnvApp <- function() {
    appDir <- system.file("shiny", package = "singleCellTK")
    # shiny::shinyOptions()
    shiny::runApp(appDir, display.mode = "normal")
}
broadinstitute/infercnvApp documentation built on Sept. 21, 2021, 4:17 p.m.