data(eusilc)
## simple random sampling
draw(eusilc[, c("id", "eqIncome")], size = 20)
## group sampling
draw(eusilc[, c("hid", "id", "eqIncome")],
group = "hid", size = 10)
## stratified sampling
draw(eusilc[, c("id", "region", "eqIncome")],
design = "region", size = c(2, 5, 5, 3, 4, 5, 3, 5, 2))
Run the code above in your browser using DataLab