三角模糊层次分析法

clear all;
close all;
clc;
 
 n=input（‘输入n‘）; % 指标个数
 RI=input（‘输入RI‘）; % 判断一致性的


 for i=1:n
     A{i}=input（‘输入矩阵‘）;
 end
 
U=[];
for i=1:n
   U=[U;A{i}（:3）];
end
U=reshape（Unn）;
 
M=[];
for i=1:n
    M=[M;A{i}（:2）];
end

M=reshape（Mnn）;

disp（‘中值矩阵M‘）;disp（‘‘）;
M

L=[];
for i=1:n
   L=[L;A{i}（:1）];
end
L=reshape（Lnn）;

E=[];
E=1-（U-L）./（2*M）;


disp（‘模糊判断因子矩阵‘）;disp（‘‘）;
E
Q=M*E;
disp（‘调整判断矩阵Q‘