data('iris')
reliability(iris, vars = c('Sepal.Length', 'Sepal.Width', 'Petal.Length', 'Petal.Width'),
omegaScale = TRUE)
#
# RELIABILITY ANALYSIS
#
# Scale Reliability Statistics
# -----------------------------------------
# Cronbach's alpha McDonald's omega
# -----------------------------------------
# scale 0.708 0.848
# -----------------------------------------
#
Run the code above in your browser using DataLab