From 6a34df22a9c17ac297b1016b9a72668eb6b72888 Mon Sep 17 00:00:00 2001 From: PaulJonasJost Date: Thu, 1 Feb 2024 13:07:27 +0100 Subject: [PATCH] Small change. --- program/shinyApp/R/single_gene_visualisation/server.R | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/program/shinyApp/R/single_gene_visualisation/server.R b/program/shinyApp/R/single_gene_visualisation/server.R index 14d63047..a13de9d8 100644 --- a/program/shinyApp/R/single_gene_visualisation/server.R +++ b/program/shinyApp/R/single_gene_visualisation/server.R @@ -111,12 +111,11 @@ single_gene_visualisation_server <- function(id, data){ req(input$singleGeneGo>0) print(input$Select_Gene) if(single_Gene_vis$calculate == 1){ - # update the data if needed + # update the data data <- update_data(session$token) # set the counter to 0 to prevent any further plotting single_Gene_vis$calculate <- 0 } - GeneDataFlag <- F # Select data for the gene based on gene Selection & group Selection if(input$type_of_data_gene == "preprocessed"){