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