# fichier à supprimer, fonction test pour mise en place de l'api
ma_fonction <- function() {
  list(
    status = "youhou",
    time = Sys.time()
  )
}