层次分析法解释matlab代码(简单已改)

clc;clear;A=[15371/511/331/33151/71/31/51];[m,n]=size(A);%获取指标个数RI=[000.580.901.121.241.321.411.451.491.51];R=rank(A);%求判断矩阵的秩[V,D]=eig(A);%求判断矩阵的特征值和特征向量，V特征值，D特征向量；tz=max(D);B=max(tz);%最大特征值[row,col]=find(D==B);%最大特征值所在位置C=V(:,col);%对应特征向量CI=(B-n)/(n-1);%计算一致性检验指标CICR=CI/RI(1,n);ifCR0.10disp('CI=');disp(CI);disp('CR=');disp(CR);disp('对比矩阵A通过一致性检验，各向量权重向量Q为：');Q=zeros(n,1);fori=1:nQ(i,1)=C(i,1)/sum(C(:,1));%特征向量标准化endQ%输出权重向量elsedisp('对比矩阵A未通过一致性检验，需对对比矩阵A重新构造');end