|
|
@@ -116,7 +116,7 @@ server <- shinyServer(function(input, output) |
|
|
|
str_to_title, |
|
|
|
Heure = timestamp %>% |
|
|
|
as.POSIXct %>% |
|
|
|
format(format = "%H:%S")) %>% |
|
|
|
format(format = "%H:%M")) %>% |
|
|
|
select(Date, Heure, Etat, `Vœu`, Subdivision, Discipline, `Désir (non officiel) en chirurgie générale`, Rang) -> |
|
|
|
listing |
|
|
|
|
|
|
|