MATLAB层次分析法源程序

调试通过，程序入口和出口都详细列出，在文件夹readme.txt文件中。数学建模层次分析法源程序。

function [cr0cr1crw0w1ts]=ahp（AB）
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% [cr0cr1crw0w1ts]=ahp（AB）
% cr0，准则层一致性比例
% cr1，方案层一致性比例
% cr，层次总排序一致性比例
% w0，准则层权值
% w1，方案层权值
% ts，总权值
% A准则层判断矩阵
% B，方案层判断矩阵
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%5
[mn]=size（A）;
RI=[0 0 0.58 0.9 1.12 1.24 1.32 1.41 1.45];
[xlumda]=eig（A）;
r=abs（sum（lumda））;
n=find（r==max（r））;   
max_lumda_A=lumda（nn）;
w0=x（:n）/sum（x（:n））;
cr0=（max_lumda_A-m）/（m-1）/RI（m）;

n=size（B）;
n2=n（1）;
for i=1:m
    [xy]=eig（B（::i））;
    lamda=max（diag（y））;
    num=find（diag（y）==lamda）;
    w1（:i）=x（:num）/sum（x（:num））;
    cr1（i）=（lamda-n2）/（n2-1）/RI（n2）;
end
ts=w1*w0;
cr=cr1*w0;

end 

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        231  2016-01-27 13:02  层次分析法\A.mat

     文件        797  2016-01-27 13:01  层次分析法\ahp.m

     文件        280  2016-01-27 13:02  层次分析法\B.mat

     文件        201  2016-01-27 15:25  层次分析法\readme.txt

     目录          0  2016-01-27 15:24  层次分析法

----------- ---------  ---------- -----  ----

                 1509                    5