# NOT RUN {
library("laeken")
library("data.table")
data("eusilc")
dataset1 <- data.table(IDd = paste0("V", 1 : nrow(eusilc)), eusilc)
# Full population
d <- linrmir(Y = "eqIncome", id = "IDd", age = "age",
weight = "rb050", Dom = NULL,
dataset = dataset1, order_quant = 50L)
# }
# NOT RUN {
# By domains
dd <- linrmir(Y = "eqIncome", id = "IDd", age = "age",
weight = "rb050", Dom = "db040",
dataset = dataset1, order_quant = 50L)
dd
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab