fa_loadings(fa, treshold=0, round=2, labels=NA)
require(neuropsychology) require(psych) df <- select_numeric(personality) fa <- psych::fa(df) fa_loadings(fa)$max
Run the code above in your browser using DataCamp Workspace