johrpan/geposanui
1
0
Fork 0
mirror of https://github.com/johrpan/geposanui.git synced 2025-10-26 11:17:24 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Separate reference and comparison gene sets

Browse source
This commit is contained in:
Elias Projahn 2022-08-18 09:02:53 +02:00
parent 4e0eb523ea
commit 04ab4f4a82
5 changed files with 28 additions and 19 deletions
Download patch file Download diff file Expand all files Collapse all files

4
R/comparison_editor.R
View file

@ -11,7 +11,7 @@ comparison_editor_ui <- function(id, options) {
choices = c(
"Your genes",
"Random genes",
names(options$gene_sets)
names(options$comparison_gene_sets)
)
),
conditionalPanel(
@ -47,7 +47,7 @@ comparison_editor_server <- function(id, preset, options) {
} else if (input$comparison_genes == "Your genes") {
custom_gene_ids()
} else {
options$gene_sets[[input$comparison_genes]]
options$comparison_gene_sets[[input$comparison_genes]]
}
})
})