資源簡(jiǎn)介
層次分析法MATLAB源代碼,可直接進(jìn)行使用,注釋簡(jiǎn)單易懂
代碼片段和文件信息
%%AHP權(quán)重計(jì)算
%%數(shù)據(jù)讀入
clc
clear?all;
%A=[1?1/5?1/4?1?1/3;5?1?2?5?3;4?1/2?1?3?2;1?1/5?1/3?1?1/3;3?1/3?1/2?3?1];%判斷矩陣
A=[1?1/3?1/2?1?1/5;3?1?2?3?1/2;2?1/2?1?2?1/3;1?1/3?1/2?1?1/5;5?2?3?5?1;];
%%一致性檢驗(yàn)和權(quán)向量計(jì)算
[nn]=size(A);
[vd]=eig(A);
r=d(11);
CI=(r-n)/(n-1);
RI=[0?0?0.58?0.90?1.12?1.24?1.32?1.41?1.45?1.49?1.52?1.54?1.56?1.58?1.59];
CR=CI/RI(n);
if?CR<0.10
???CR_result=‘通過‘;
else
????CR_result=‘不通過‘;
end
%%權(quán)向量計(jì)算
w=v(:1)/sum(v(:1));
w=w‘;
%%結(jié)果輸出
disp(‘該判斷矩陣權(quán)向量計(jì)算報(bào)告:‘);
disp([‘一致性指標(biāo):‘?num2str(CI)]);
disp([‘一致性比例:‘?num2str(CR)]);
disp([‘一致性檢驗(yàn)結(jié)果:‘?CR_result]);
disp([‘特征值:‘?num2str(r)]);
disp([‘權(quán)向量:‘?num2str(w)]);
????
????????tle>鏈皢瀵硅薄寮曠敤璁劇疆鍒板璞$殑瀹炰緥銆?/title>
????????ta?name=“viewport“?content=“width=device-width“?/>
????????yle>
評(píng)論
共有 條評(píng)論