if (FALSE) {
tableaux <- list(
"Descriptif" = data.frame(
variable = c("age", "revenu"),
n = c(200L, 200L),
moyenne = c(38.2, 245000)
),
"Croisement" = data.frame(
region = c("Nord", "Sud"),
urbain = c(45.2, 32.1),
rural = c(54.8, 67.9)
)
)
chemin <- file.path(tempdir(), "stats_ins.xlsx")
exporter_excel_ins(tableaux, chemin,
titre_classeur = "Enquete menages 2026",
pays = "Centrafrique", annee = 2026L)
}
Run the code above in your browser using DataLab