关于一致性检验的程序

雨情

clc;
clear;
A=[1 1.2 1.5 1.5;
0.833  1 1.2 1.2;
0.667  0.833  1 1.2;
0.667  0.833  0.833  1];                           
                                   %因素对比矩阵A，只需要改变矩阵A
[m,n]=size(A);                     %获取指标个数
RI=[0 0 0.58 0.90 1.12 1.24 1.32 1.41 1.45 1.49 1.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);                    %计算一致性检验指标CI
CR=CI/RI(1,n);   
if CR<0.10
    disp('CI=');disp(CI);
    disp('CR=');disp(CR);
    disp('对比矩阵A通过一致性检验，各向量权重向量Q为：');
    Q=zeros(n,1);
    for i=1:n
        Q(i,1)=C(i,1)/sum(C(:,1)); %特征向量标准化
    end
    Q                              %输出权重向量
else
    disp('对比矩阵A未通过一致性检验，需对对比矩阵A重新构造');
end




为啥我输入后老是提示    Error: Missing variable or function.

F1F2F3

求指点啊

我和玲佑有个约

我这边可以正确运行啊

zeng119

直接运行没有建立其他文件吧？

zeng119

我这边也可以直接运行

Pcbbar

在if语句后面还需要再加个且大于等于0，不然会有CI小于零但是一致性也通过的情况

xiang18

这个帖子挺有用的
有个小问题：
[m,n]=size(A); %获取指标个数

R=rank(A); %求判断矩阵的秩
这两句的效果是不是一样的？A本身就是一个方阵

你好我是河源人

只能是方阵吗