fix: getCountStatistics reacts on pgx

bigomics · Nov 2, 2023 · 7021a0a · 7021a0a
1 parent ede3639
commit 7021a0a
Showing 1 changed file with 8 additions and 2 deletions.
diff --git a/components/board.dataview/R/dataview_server.R b/components/board.dataview/R/dataview_server.R
@@ -279,8 +279,14 @@ DataViewBoard <- function(id, pgx) {
 
     getCountStatistics <- reactiveVal()
 
-    observeEvent(c(input$data_groupby, input$data_samplefilter, input$data_type),
-      {
+    observeEvent(
+    {
+        pgx$X
+        input$data_groupby
+        input$data_samplefilter
+        input$data_type
+    },
+    {
         shiny::req(pgx$X, pgx$Y, pgx$samples)
         shiny::validate(shiny::need("counts" %in% names(pgx), "no 'counts' in object."))
         subtt <- NULL