This provides the user to pick a single gene set from a GeneSetDb collection. To help the user find the gene set, the user can select which collections and gene set sizes that serve as the universe of potential gene sets to pick from in a GeneSetDb.

reactiveGeneSetSelect(input, output, session, gdb = NULL, ...)

reactiveGeneSetSelectUI(id, label = NULL, dropdown_width = "350px", ...)

Arguments

input, output, session

shiny module bits

gdb

A [reactiveGeneSetDb()] module, or `NULL`

...

pass through (not used)

id

the id/namespace for the module

label

passed to [shiny::selectizeInput()]

dropdown_width

the width of the dropdown element in pixels

Value

A list of geneset info and membersihp

Functions

  • reactiveGeneSetSelectUI: The UI function

Examples

sres <- sparrow::exampleSparrowResult()
gdb <- sparrow::geneSetDb(sres)
app <- shiny::shinyApp(
  ui = shiny::shinyUI(shiny::fluidPage(
    exampleUISetup(),
    title = "Gene set selctor",
    reactiveGeneSetSelectUI("mod"))),
  server = function(input, output, session) {
    shiny::callModule(reactiveGeneSetSelect, "mod", gdb)
  })
if (interactive()) {
  shiny::runApp(app)
}