johrpan/geposanui
1
0
Fork 0
mirror of https://github.com/johrpan/geposanui.git synced 2025-10-25 20:07:23 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

gene selector: Fix bug in condition

Browse source
This commit is contained in:
Elias Projahn 2024-02-13 16:53:11 +01:00
parent 2ebb55fac6
commit 21b28bf1e8
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
R/gene_selector.R
View file

@ -94,7 +94,7 @@ gene_selector_server <- function(id) {
geposan::genes[id %chin% inputs, id]
}
if (length(gene_ids > 100)) {
if (length(gene_ids) > 100) {
gene_ids[seq_len(100)]
} else {
gene_ids