इस डेटा का उपयोग करना:
head(USArrests)
nrow(USArrests)
मैं पीसीए इस प्रकार कर सकता हूं:
plot(USArrests)
otherPCA <- princomp(USArrests)
मैं नए घटकों को प्राप्त कर सकता हूं
otherPCA$scores
और विचरण के अनुपात को घटकों द्वारा समझाया गया
summary(otherPCA)
लेकिन क्या होगा अगर मैं जानना चाहता हूं कि कौन से चर ज्यादातर मुख्य घटकों द्वारा समझाया जाता है? और इसके विपरीत: जैसे PC1 या PC2 ज्यादातर द्वारा समझाया गया है murder
? मैं यह कैसे कर सकता हूँ?
क्या मैं उदाहरण के लिए कह सकता हूं कि PC1 80% द्वारा समझाया गया है murder
या assault
?
मुझे लगता है कि लोडिंग मुझे यहां मदद करता है, लेकिन वे दिशात्मकता दिखाते हैं न कि विचरण को समझाया गया है जैसा कि मैं इसे समझता हूं, उदा
otherPCA$loadings
Loadings:
Comp.1 Comp.2 Comp.3 Comp.4
Murder 0.995
Assault -0.995
UrbanPop -0.977 -0.201
Rape -0.201 0.974