Integrated suggested changes

ICB-DCM · Nov 7, 2024 · 9c23a97 · 9c23a97
1 parent 710fe48
commit 9c23a97
Show file tree

Hide file tree

Showing 2 changed files with 0 additions and 3 deletions.
diff --git a/program/shinyApp/R/enrichment_analysis/server.R b/program/shinyApp/R/enrichment_analysis/server.R
@@ -17,7 +17,6 @@ enrichment_analysis_geneset_server <- function(
       }else{
         print(paste(id, "Enrichment Done"))
         print(result)
-        browser()
         # Enrichment Result Plot
         # only plot if the best found adjustment value is significant
         if(nrow(result@result) > 0){
@@ -47,7 +46,6 @@ enrichment_analysis_geneset_server <- function(
           ea_scenario <- 0
         }
 
-
         # download R Code for further plotting
         output$getR_Code <- downloadHandler(
           filename = function(){

diff --git a/program/shinyApp/R/enrichment_analysis/ui.R b/program/shinyApp/R/enrichment_analysis/ui.R
@@ -6,7 +6,6 @@ geneset_panel_UI <- function(
 
   tabPanel(
     title = id_wo_ns,
-    #textOutput(outputId = ns("EnrichmentInfo"), container = pre),
     tabsetPanel(
       tabPanel(
         title = paste(id_wo_ns, " Enrichment"),