结果 (2)用数量积法建立模糊相似矩阵,并求出其传递闭包矩阵 for F=ln 1:n for kl m abs(A(l, k)"A(, k)); end R(n,n}=1; s=0 for k=l: m s=Stabs(A(i k) *AG, k)) end if(FiR(js/c, else R(LD=1 end end R tR(n, nF=1 for Fl: n for F= 1. tR(LIFO for kl: n if(R(k)<R(kj)s=R(ik),%先取小 else S=R(k,j; ftR(ij)<sR(ij)=s%后取大 end end end for l结果： ⑵ 用数量积法建立模糊相似矩阵，并求出其传递闭包矩阵. c=0;s=0; for i=1:n for j=1:n s=0; for k=1:m s=s+abs(A(i,k)*A(j,k)); end if(c<s)c=s; end end end c R(n,n)=1; for i=1:n for j=1:n s=0; for k=1:m s=s+abs(A(i,k)*A(j,k)); end if(j~=i)R(i,j)=s/c; else R(i,j)=1; end end end R tR(n,n)=1; s=0; while s<n*n for i=1:n for j=1:n tR(i,j)=0; for k=1:n if(R(i,k)<R(k,j))s=R(i,k);%先取小 else s=R(k,j); end if(tR(i,j)<s)tR(i,j)=s;%后取大 end end end end for i=1:n