1、模糊数学方法及其应用 1-4%谢季坚 刘承平模糊数学方法及其应用第三版 中部分算法MATLAB程序%1.F_tj.mfunctionAx=F_tj(A,m0)%定义函数%模糊统计，m0 划分区间个数n,m=size(A);%获得矩阵的行列数Amin=A(1,1);%A的最小值Amax=A(1,2);%A的最大值for(i=1:n)if(A(i,1)A(i,2)x=A(i,2);A(i,2)=A(i,1);A(i,1)=x;end%A的最小值if(A(i,1)Amax)Amax=A(i,2);end%A的最大值endx=Amin:(Amax-Amin)/m0:Amax;Ax=;for(k=1:m
2、0+1)Ax(k)=0;for(i=1:n)if(x(k)=A(i,1) endif(xmaxX(j,k)x=X(i,k);else x=X(j,k);end;endfm=fm+x;elseif(cs=6)for(k=1:m)fm=fm+(X(i,k)+X(j,k)/2;end%算数平均最小法else for(k=1:m)fm=fm+sqrt(X(i,k)*X(j,k);end;end%几何平均最小法R(i,j)=fz/fm;end;endelseif(csd)minM=d;endend;endminM=0.9999*minM;if(minM0.000001)return;endfor(i=1
3、:m)for(j=1:n)d=0;if(j=i)R(i,j)=1;continue;endif(cs=11)for(k=1:m)d=d+(X(i,k)-X(j,k)2;endd=sqrt(d);%欧几里得距离elseif(cs=12)for(k=1:m)d=d+abs(X(i,k)-X(j,k);end%海明距离else for(k=1:m)if(dabs(X(i,k)-X(j,k)d=abs(X(i,k)-X(j,k);end;end;end%切比雪夫距离R(i,j)=minM/d;end;endelse for(i=1:n)for(j=1:n)d=0;%指数距离法if(cs=14)for(k=1:m)d=d+(X(i,k)-X(j,k)2;endd=sqrt(d);%欧几里得距离elseif(cs=12)for(k=1:m)d=d+abs(X(i,k)-X(j,k);end%海明距离else for(k=1:m)if(dabs(X(i,k)-X(j,k)d=abs(X(i,k)-X(j,k);end;end;end%切比雪夫距离R(i,j)=exp(-d);end;end;end
