feat: add req

avoid hubspot tickets on reactive change
bigomics · Oct 15, 2024 · a251c20 · a251c20
1 parent d364fee
commit a251c20
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/components/board.wgcna/R/wgcna_table_genes.R b/components/board.wgcna/R/wgcna_table_genes.R
@@ -33,6 +33,7 @@ wgcna_table_genes_server <- function(id,
 
       k <- selected_module()
       genes <- out$me.genes[[k]]
+      shiny::req(genes)
       tt <- playdata::GENE_TITLE[toupper(genes)]
       rho <- cor(out$datExpr[, genes], out$net$MEs[, k])[, 1]