set.seed(42)
donnees <- data.frame(
age = sample(18:65, 200, replace = TRUE),
revenu = rexp(200, rate = 1/250000),
poids = runif(200, 0.8, 1.3),
milieu = sample(c("urbain", "rural"), 200, TRUE)
)
tableau_descriptif(donnees, vars = c("age", "revenu"), poids = "poids")
Run the code above in your browser using DataLab