distinct pas la bonne solution ici

app.R

@@ -167,8 +167,6 @@ server <- shinyServer(function(input, output)
                           db %>%
                             tbl("trajectoires") %>%
                             filter(Etudiant %in% listing) %>%
-                            select(-`Vœu`) %>%
-                            distinct %>%
                             collect(n = Inf) %>%
                             mutate(Date = timestamp %>% 
                                           as.POSIXct,