set.seed(42)
n <- 200
menages <- data.frame(
nutrition = rbinom(n,1,0.35), electricite = rbinom(n,1,0.60),
eau = rbinom(n,1,0.40), poids = runif(n,0.8,1.3)
)
res <- calcul_ipm(menages, var_nutrition="nutrition",
var_electricite="electricite", var_eau="eau", poids="poids")
tableau_ipm(res, pays="Centrafrique", annee=2026L)
Run the code above in your browser using DataLab