if (FALSE) {
# load dataset satisfaction
data(satisfaction)
# blocks Image and Expectations
ima_expe = list(Image=1:5, Expec=6:10)
# compute unidimensionality indices
unidim(satisfaction, ima_expe)
}
Run the code above in your browser using DataLab