PCA分析,R包,利用R内置函数,计算pc1和pc2,后进行pca可视化