%%AHP權重計算
%%數據讀入
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;];
%%一致性檢驗和權向量計算
[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
%%權向量計算
w=v（:1）/sum（v（:1））;
w=w‘;
%%結果輸出
disp（‘該判斷矩陣權向量計算報告:‘）;
disp（[‘一致性指標:‘?num2str（CI）]）;
disp（[‘一致性比例:‘?num2str（CR）]）;
disp（[‘一致性檢驗結果:‘?CR_result]）;
disp（[‘特征值:‘?num2str（r）]）;
disp（[‘權向量:‘?num2str（w）]）;

????
????????tle>鏈皢瀵硅薄寮曠敤璁劇疆鍒板璞＄殑瀹炰緥銆?/title>
????????ta?name=“viewport“?content=“width=device-width“?/>
????????yle>