Bonjour,

Après mes longues recherches & tests, je n'ai pas réussi & je suis bloqué sur un problème de conversion de input$date. Ci-dessous la description du problème. Merci de me donner un coup de main.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
 
ui.R
 
uiOutput("b_effective_date"),
uiOutput("b_birth_date"),
uiOutput("b_first_term")
 
----
 
server.R
 
 output$b_effective_date <- renderUI({
    dateInput(inputId   = "b_effective_date",
              label = "effective date",
              value = Sys.Date(),
              format = "dd/mm/yyyy")
  }) 
  output$b_birth_date <- renderUI({
    dateInput(inputId = "b_birth_date",
              label = "birth date",
              value = Sys.Date(),
              format = "dd/mm/yyyy")
  })   
  output$b_first_term <- renderUI({
    # Using a named list in order to pass the same value regardless of the label (which changes with the language)
    dateInput(inputId   = "b_first_term",
              label     = "first term",
              value = Sys.Date(),
              format = "dd/mm/yyyy")
  })
dfAmort <- reactive({   
    effectDate <- as.Date(input$b_effective_date, format="dd/mm/yyyy")
    birth_date <- as.Date(input$b_birth_date, format="dd/mm/yyyy")
    first_term <- as.Date(input$b_first_term, format="dd/mm/yyyy")
})
quand j'exécute, le message est : do not know how to convert 'input$b_effective_date' to class “Date”

Dans RStudio local, cette erreur disparait après qq secondes mais quand je déploye mon appli sur shinyapps.io ca ne passe plus.

Pourriez-vous m'indiquer comment résoudre ce problème svp

Merci à l'avance

P