#Using OECD scale
eq_predicate(predicate = "HY022", ncomp = "ncomp", age = "age16",
scale.eq = "OECD7050", data = eusilc) #OECD7050
eq_predicate(predicate = "HY022", ncomp = "ncomp", age = "age16",
scale.eq = "modifiedOECD", data = eusilc) #modifiedOECD
#Define a new scale
newscal <- data.frame("ncomp" = c(1:7), "s.eq" = runif(7,1,10) ) # new
eq_predicate(predicate = "HY022", ncomp = "ncomp", scale.eq = "new",
newscale = newscal, data = eusilc)
Run the code above in your browser using DataLab