R语言主成分分析练习