Describe 襷_譯殊焔覿 here

R princomp prcomp 螳讌 譯殊焔覿 螳 . 覯企 蟆郁骸螳 蟇一 觜訣讌襷 企 螻襴 るゴ. princomp 蟲螻殊 襷 る 覦覯豌 螻給壱 螻覯″磯ゼ 蟲 覦覯 螻, prcomp 襭 轟願 覿(SVD:Singular Value Decomposition) 覦覯 . 覲危 prcomp襯 誤覃 princomp S-Plus 誤 譟伎.

USArrests 襭襯 企慨. 覩瑚記 螳 譯朱襦 瑚規觜(UrbanPop)螻 瑚規 10襷覈 譴 伎(Murder), (Assault), 螳螳(Rape) 襦 豌危 襭企. scale 旧 TRUE襦 伎 瑚規觜螻 豌危 螳 襦 螳 るゴ蠍 覓語企. princomp 蟯 PCA襯 蟲.

> p1 = prcomp(USArrests, scale=TRUE)
> p2 = princomp(USArrests, cor=TRUE)

prcomp 蟆曙 print 覲, summary 譯殊焔覲 覲企ゼ 覲伎譴.
> print(p1)
Standard deviations:
[1] 1.5748783 0.9948694 0.5971291 0.4164494

Rotation:
                PC1        PC2        PC3         PC4
Murder   -0.5358995  0.4181809 -0.3412327  0.64922780
Assault  -0.5831836  0.1879856 -0.2681484 -0.74340748
UrbanPop -0.2781909 -0.8728062 -0.3780158  0.13387773
Rape     -0.5434321 -0.1673186  0.8177779  0.08902432
> summary(p1)
Importance of components:
                        PC1   PC2    PC3    PC4
Standard deviation     1.57 0.995 0.5971 0.4164
Proportion of Variance 0.62 0.247 0.0891 0.0434
Cumulative Proportion  0.62 0.868 0.9566 1.0000

biplot PC1螻 PC2襯 豢朱 2谿 覃伎 襭襯 貅 覲伎譴. 覈轟 蠍 襷 蠏碁殊 蠏碁Π.
> biplot(p1)
> #plot  scree plot 蠏碁れ.
> plot(p1)

る 螳
襷 覲危糾螻 覲 . -- 覲 2016-11-11 21:03:22