在R中进行PCA时,
p <- princomp(iris[,1:4])
Run Code Online (Sandbox Code Playgroud)
我通过以下两种方法得出不同Component的系数:
IrisLoading <- p$loadings[,1:2] #methods1, use the fist two Comp.
Run Code Online (Sandbox Code Playgroud)
结果是这样的
Comp.1 Comp.2
Sepal.Length 0.36138659 -0.65658877
Sepal.Width -0.08452251 -0.73016143
Petal.Length 0.85667061 0.17337266
Petal.Width 0.35828920 0.07548102
Run Code Online (Sandbox Code Playgroud)
那么如果我只查看它的负载
p$loadings
Run Code Online (Sandbox Code Playgroud)
结果是
Loadings:
Comp.1 Comp.2 Comp.3 Comp.4
Sepal.Length 0.361 -0.657 -0.582 0.315
Sepal.Width -0.730 0.598 -0.320
Petal.Length 0.857 0.173 -0.480
Petal.Width 0.358 0.546 0.754
Run Code Online (Sandbox Code Playgroud)
为什么我“筛选”Comp.后Comp1和2的系数会改变?