Interactively explore a SparrowResult via a shiny app

This will launch a shiny application that enables exploratory analysis of the results from the different GSEA methods run within a `SparrowResult`. This function accepts a `SparrowResult` that will be visualized, or if run without a `SparrowResult`, the app will enable the user to upload one.

explore(x)

Arguments

x

A `SparrowResult` object, or path to one as an *.rds. If missing, the shiny app will load without a `SparrowResult` object to explore, and the user can upload one into the app.

Value

Returns the result from a call to [shiny::runApp()].

Details

Reference the "shiny-sparrow" vignette for more detailed documentation of the functionality provided by this application.

Examples

# vm <- sparrow::exampleExpressionSet()
# gdb <- sparrow::exampleGeneSetDb()
# sr <- sparrow::seas(vm, gdb, vm$design, methods=c('camera', 'fry'))
sr <- sparrow::exampleSparrowResult()
if (interactive()) {
  explore(sr)
}