Use virtualselect from shinyWidgets

This commit is contained in:
Elias Projahn 2022-06-02 19:09:13 +02:00
parent 90c9d18f26
commit ef1c3caa04
2 changed files with 2 additions and 2 deletions

View file

@ -27,4 +27,4 @@ Imports:
glue, glue,
gprofiler2, gprofiler2,
shiny, shiny,
shinyvs shinyWidgets

View file

@ -31,7 +31,7 @@ gene_selector_ui <- function(id) {
type = "hidden", type = "hidden",
tabPanelBody( tabPanelBody(
"list", "list",
shinyvs::virtualSelectInput( shinyWidgets::virtualSelectInput(
NS(id, "selected_genes"), NS(id, "selected_genes"),
label = NULL, label = NULL,
choices = gene_choices, choices = gene_choices,