set.seed(42)
donnees <- data.frame(
region = sample(c("Nord", "Sud", "Est", "Ouest"), 300, TRUE),
milieu = sample(c("urbain", "rural"), 300, TRUE, prob = c(0.4, 0.6)),
poids = runif(300, 0.7, 1.4)
)
tableau_croise_ins(donnees, "region", "milieu", poids = "poids")
Run the code above in your browser using DataLab