
| 目标层 | 买钢笔 | ||||
| 准则层 | 质量 | 颜色 | 价格 | 外形 | 实用 |
| 方案层 | 可供选择的3只钢笔 | ||||
重要性相同 稍微重要 重要 很重要 绝对重要 1 3 5 7 9
1 2 3 4 5 6 7 8 9 0 0 0.58 0.90 1.12 1.24 1.32 1.41 1.45
%层次分析法AHP
clear all
clc
%构建方案层的比较矩阵
B1 = [1 2 3; 1/2 1 2; 1/5 1/2 1];
B2 = [1 1/3 1/8; 3 1 1/3; 8 3 1];
B3 = [1 1 3; 1 1 3; 1/3 1/3 1];
B4 = [1 3 4; 1/3 1 1; 1/4 1 1];
B5 = [1 1 1/4; 1 1 1/4; 4 4 1];
B = [B1 B2 B3 B4 B5];
%构建准则层的比较矩阵
A = [1 1/2 4 3 3;
2 1 7 5 5;
1/4 1/7 1 1/2 1/3;
1/3 1/5 2 1 1;
1/3 1/5 3 1 1];
%方案层一致性判断
W1 = [];%方案层汇总的权值
RI = [0 0 0.52 0.89 1.12 1.26 1.36 1.41 1.46 1.49 1.52 1.54 1.56 1.58 1.59 1.60 1.61 1.615 1.62 1.63];
for i = 1:5
[m,n] = size(B(1:3,3*(i-1)+1:3*i));
[V,D] = eig(B(1:3,3*(i-1)+1:3*i));%求得特征向量和特征根
%求出最大特征值和它所对应的特征向量
Max = D(1,1);
pos = 1;
for j = 1:n
if D(j,j) > Max
Max = D(j,j);
pos = j;%记录最大特征值的位置
end
end
w = abs(V(:,pos));%找出每个因素的权值
w = w / sum(w);%归一化
CI = (Max - n) / (n - 1);
CR = CI / RI(n);
if CR < 0.10
X = ['方案层第',num2str(i),'个矩阵一致性可以接受!',' ','CR:',num2str(CR)];
disp(X)
else
X = ['方案层第',num2str(i),'个矩阵一致性验证失败,请重新进行评分!'];
disp(X)
end
W1 = [W1 w];
end
%准则层一致性判断
[m,n] = size(A);
[V,D] = eig(A);
Max = D(1,1);
pos = 1;
for j = 1:n
if D(j,j) > Max
Max = D(j,j);
pos = j;
end
end
w = abs(V(:,pos));
w = w / sum(w);
W2 = w;
CI = (Max - n) / (n - 1);
CR = CI / RI(n);
if CR < 0.10
X = ['准则层矩阵一致性可以接受!',' ','CR:',num2str(CR)];
disp(X)
else
X = ['准则层矩阵一致性验证失败,请重新进行评分!'];
disp(X)
end
%计算每个方案对最终目标的权值
disp('每个方案对最终目标的权值:')
answer = W1*W2
%最后计算结果为:
方案层第1个矩阵一致性可以接受! CR:-0.14068
方案层第2个矩阵一致性可以接受! CR:0.0014823
方案层第3个矩阵一致性可以接受! CR:-2.135e-15
方案层第4个矩阵一致性可以接受! CR:0.0088488
方案层第5个矩阵一致性可以接受! CR:-8.5402e-16
准则层矩阵一致性可以接受! CR:0.01609
每个方案对最终目标的权值:
answer =
0.2888
0.2522
0.4590© 2024 All rights reserved. 北京转创国际管理咨询有限公司 备案号: 京ICP备19055770号-4
Transverture International Group Co Ltd, Guangdong Branch
地址:广州市天河区天河北路179号尚层国际1601
深圳市福田区深南中路2066号华能大厦
佛山顺德区北滘工业大道云创空间
东莞市大朗镇富丽东路226号松湖世家
梅州市丰顺县留隍镇新兴路881号
长沙市芙蓉区韶山北路139号文化大厦

欢迎来到本网站,请问有什么可以帮您?
稍后再说 现在咨询