%%load shuju.txt %把原始数据保存在纯文本文件shuju.txt中shuju=zscore(shuju); %数据标准化r=corrcoef(shuju); %计算相关系数矩阵[x,y,z]=pcacov(r); f=repmat(sign(sum(x)),size(x,1),1); %x工作表中为标准化变量的中成分对应的特征向量，每一列为一种主成分的的系数。x=x.*f; df=shuju*x(:,1:4) %z为累计贡献率tf=df*z(1:4)/100; [stf,ind]=sort(tf,'descend') %注意：列为各指标因素，行为待评价事物。
以上内容，部分整理于《数学建模32种常规方法》，需要电子版学习的请私信。
