如何求模糊等价矩阵,MATLAB程序答:Dim m As Integer, N As Integer, i As Integer, j As Integer, k As Integer Dim Xia As Double, Xja As Double Dim S1 As Double, Si2 As Double, Sj2 As Double N = UBound(Data, 1): m = UBound(Data, 2) 'N样品数,M变量数 For i = 1 To N For j = 1 To N If i = j Then...