PCA分析步骤:
第一步,对所有样本进行中心化
第二步,求特征协方差矩阵
第三步,求协方差矩阵的特征值和特征向量
第四步,将特征值按照从大到小的顺序排序,选择其中最大的k个,然后将其对应的k个特征向量分别作为列向量组成特征向量矩阵
第五步,将样本点投影到选取的特征向量上(用欧氏距离方程计算点间距离)
getwd()
#导入三张表
gene_exp<-read.csv("gene_exp.csv",header = T,row.names = 1)
gene_info<-read.csv("gene_info.csv",header = T,row.names = 1)
sample_info<-read.csv("sample_info.csv",header = T,row.names = 1)
#BiocManager::install("PCAtools