fusion de 4-remplir-l-onglet-eaux-souterraines vers dev_actualisation_2024

Closes #4 (closed)

R/app_server.R

@@ -9,6 +9,7 @@ app_server <- function(input, output, session) {
 
   # valeurs réactives au démarrage
   global <- shiny::reactiveValues(
+
     station_esu = station_esu,
     quantification_esu = quantification_esu,
     recherchetrouve_esu = recherchetrouve_esu,
@@ -24,6 +25,10 @@ app_server <- function(input, output, session) {
     quantification_eso = quantification_eso,
     recherchetrouve_eso = recherchetrouve_eso,
     tableau_concentration_eso = tableau_concentration_eso,
+
+    seqeau_eso = seqeau_eso,
+    choix_couleur_eso = choix_couleur_eso,
+
     matrice_eso = matrice_eso,
     stations_eso = stations_eso,
     parametres_eso = parametres_eso,
@@ -40,6 +45,9 @@ app_server <- function(input, output, session) {
   callModule(mod_selection_tableau_bord_ESU_server,"selection_tableau_bord_ESU_1", global  = global)
   mod_visualisation_tableau_bord_ESU_server("visualisation_tableau_bord_ESU_1", global  = global)
 
+  callModule(mod_selection_tableau_bord_ESO_server,"selection_tableau_bord_ESO_1", global  = global)
+  mod_visualisation_tableau_bord_ESO_server("visualisation_tableau_bord_ESO_1", global  = global)
+
   mod_consulter_molecules_server("consulter_molecules_1", global = global)
 
   # output$a_propos_classe_qualite <- shiny::renderUI({