if (FALSE) {
# load dataset satisfaction
data(satisfaction)
# block Image (first 5 columns of satisfaction)
Image = satisfaction[,1:5]
# compute Dillon-Goldstein's rho for Image block
rho(Image)
}
Run the code above in your browser using DataLab