В языке R команда называется prcomp. Выдает матрицу поворота и доли дисперсий. Вот пример ее работы (данные
)
Код:
> prcomp(dann.num)
Standard deviations:
[1] 8.935391 5.426740 2.682318
Rotation:
PC1 PC2 PC3
KASSIR1 0.8930753 -0.44965583 0.01504099
KASSIR2 0.4490084 0.88868055 -0.09294248
KASSIR3 -0.0284255 -0.08975816 -0.99555787
Весь результат - список данных
Код:
> prcomp(dann.num)->pr.dann
> str(pr.dann)
List of 5
$ sdev : num [1:3] 8.94 5.43 2.68
$ rotation: num [1:3, 1:3] 0.8931 0.449 -0.0284 -0.4497 0.8887 ...
..- attr(*, "dimnames")=List of 2
.. ..$ : chr [1:3] "KASSIR1" "KASSIR2" "KASSIR3"
.. ..$ : chr [1:3] "PC1" "PC2" "PC3"
$ center : Named num [1:3] 41.2 31.1 30.7
..- attr(*, "names")= chr [1:3] "KASSIR1" "KASSIR2" "KASSIR3"
$ scale : logi FALSE
$ x : num [1:49, 1:3] -6.04 5.96 8.6 10.93 -6.06 ...
..- attr(*, "dimnames")=List of 2
.. ..$ : NULL
.. ..$ : chr [1:3] "PC1" "PC2" "PC3"
- attr(*, "class")= chr "prcomp"