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

Disable gost by default

Browse source
This commit is contained in:
Elias Projahn 2021-10-07 12:42:36 +02:00
parent f002758fc8
commit 686af3f44b
2 changed files with 18 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

8
server.R
View file

@ -116,7 +116,11 @@ server <- function(input, output) {
})
output$gost <- renderPlotly({
result <- gost(results()[, gene], ordered_query = TRUE)
gostplot(result, capped = FALSE, interactive = TRUE)
if (input$enable_gost) {
result <- gost(results()[, gene], ordered_query = TRUE)
gostplot(result, capped = FALSE, interactive = TRUE)
} else {
NULL
}
})
}