update input when tab changes

iNZightVIT · Jan 6, 2025 · fffc090 · fffc090
1 parent 3b83cca
commit fffc090
Show file tree

Hide file tree

Showing 2 changed files with 17 additions and 0 deletions.
diff --git a/panels/C1_Visualize/2_visualize-panel-server.R b/panels/C1_Visualize/2_visualize-panel-server.R
@@ -7469,5 +7469,14 @@ observeEvent(input$global.round.pct, {
   graphical.par$round_percent <- input$global.round.pct
 })
 
+observeEvent(input$plot_selector, {
+  if (!is.null(input$plot_selector) && input$plot_selector == "Summary") {
+    updateNumericInput(session,
+      "global.sig.level",
+      value = graphical.par$signif
+    )
+  }
+})
+
 
 source("panels/C1_Visualize/vit.R", local = T)
diff --git a/panels/C1_Visualize/infoWindow.R b/panels/C1_Visualize/infoWindow.R
@@ -727,6 +727,14 @@ output$visualize.summary <- renderPrint({
   }
 })
 
+gloablSigLevel <- reactive(input$global.sig.level.inf)
+observeEvent(input$global.sig.level.inf, {
+  graphical.par$signif <- input$global.sig.level.inf
+  # updateNumericInput(session,
+  #   inputId = "global.sig.level",
+  #   value = graphical.par$signif
+  # )
+})
 
 # observeEvent(input$global.sig.level.inf, {
 #   graphical.par$signif <- input$global.sig.level.inf