Disable gost by default

2025-10-26 11:17:24 +01:00 · 2021-10-07 12:42:36 +02:00 · 2021-10-07 12:42:36 +02:00 · 686af3f44b
commit 686af3f44b
parent f002758fc8
2 changed files with 18 additions and 6 deletions
--- a/ui.R
+++ b/ui.R
@ -86,10 +86,18 @@ ui <- fluidPage(
        ),
        wellPanel(
            h3("Gene set enrichment analysis"),
-            plotlyOutput(
-                "gost",
-                width = "100%",
-                height = "600px"
+            checkboxInput(
+                "enable_gost",
+                "Perform a gene set enrichment analysis on the filtered result \
+                 genes."
+            ),
+            conditionalPanel(
+                "input.enable_gost == true",
+                plotlyOutput(
+                    "gost",
+                    width = "100%",
+                    height = "600px"
+                )
            )
        )
    )