Actualiser app.R

This commit is contained in:
aslane 2024-03-21 07:37:00 +00:00
parent 10edac8998
commit 9f1e49a248
1 changed files with 1 additions and 8 deletions

9
app.R
View File

@ -267,12 +267,7 @@ server <- function(input, output, session) {
}) })
# Partie permettant de fusionner les fichiers
observe({
if (session$userData$authorize == 0) {
shinyjs::runjs("shinyjs.hideAllElements();")
}
if (session$userData$authorize == 1) {
merged_data <- eventReactive(input$files, { merged_data <- eventReactive(input$files, {
# On lit la liste des fichiers et on les fusionne # On lit la liste des fichiers et on les fusionne
# Charger les données à partir des fichiers sélectionnés # Charger les données à partir des fichiers sélectionnés
@ -929,8 +924,6 @@ server <- function(input, output, session) {
#output$pls_text <- renderText({'print'}) #output$pls_text <- renderText({'print'})
}
})
} }
shinyApp(ui, server) shinyApp(ui, server)