fa（）之后访问加载数据

Question

I have the following code:

> require(psych)
> require(MASS)
> pa <- fa(Harman74.cor$cov,4,fm="pa" ,rotate="none")
> ld <- loadings(pa)

> str(ld)

loadings [1:24, 1:4] 0.598 0.372 0.42 0.484 0.688 ...
 - attr(*, "dimnames")=List of 2
  ..$ : chr [1:24] "VisualPerception" "Cubes" "PaperFormBoard" "Flags" ...
  ..$ : chr [1:4] "PA1" "PA2" "PA3" "PA4"

How can I directly access the loadings either as 4 vectors, or a 4x24 array ?

Answer 1

The question is not clear. ld is of class loadings . You can use unclass to convert it to a matrix .

unclass(ld)
                             PA1         PA2          PA3          PA4
VisualPerception       0.5982838  0.02973076  0.379881903 -0.216752604
Cubes                  0.3721564 -0.03009154  0.261549017 -0.148551734
PaperFormBoard         0.4195414 -0.11770506  0.364650207 -0.125225346
Flags                  0.4840396 -0.10757757  0.260532547 -0.190122114
GeneralInformation     0.6880672 -0.29797186 -0.274215767 -0.037571574
........

But the result is not the same since the print.loadings do some formattings and a summary of the matrix.