模糊等价矩阵的求法（Matlab）
%求模糊等价矩阵，当sum(sum(abs(Q-QQ)))/1225>1.0000e-006终止function tR=fuz_equ_mat(R)
clear Q;
clear QQ;
format long
%初始化Q，QQ
=size(R);
s=sprintf('生成的模糊等价矩阵为');
disp(s);
Q=R;
=size(R);
for i=1:n
for j=1:n
for k=1:n
X(k)=min(R(i,k),R(k,j));
end
QQ(i,j)=max(X);
end
end
while(sum(sum(abs(Q-QQ)))/1225>1.0000e-006)
Q=QQ;
for i=1:n
for j=1:n
for k=1:n
X(k)=min(Q(i,k),Q(k,j));
end
QQ(i,j)=max(X);
end
end
end
tR=Q;
页:
[1]