data('iris')
efa(iris, vars = c('Sepal.Length', 'Sepal.Width', 'Petal.Length', 'Petal.Width'))
#
# Factor Loadings
# ------------------------------------------------
# 1 2 Uniqueness
# ------------------------------------------------
# Sepal.Length 0.993 0.10181
# Sepal.Width 0.725 0.42199
# Petal.Length 0.933 0.00483
# Petal.Width 0.897 0.07088
# ------------------------------------------------
# Note. 'oblimin' rotation was used
#
Run the code above in your browser using DataLab