# \donttest{
dico <- data.frame(
nom_variable = c("age", "sexe", "region"),
type = c("numeric", "character", "character"),
obligatoire = c(TRUE, TRUE, FALSE)
)
resultat <- valider_dictionnaire(donnees, dico)
if (!resultat$valide) print(resultat$rapport)
# }
Run the code above in your browser using DataLab