?? f_jlsjbzh.m
字號:
function[X]=F_JlSjBzh(cs,X)%定義函數
%模糊聚類分析數據標準化變換: [X]=F_JlSjBzh(cs,X)
%X,數據矩陣
%cs=0,不變換;cs=1,標準差變換;cs=2,極差變換;cs=其它,最大值規格化
if(cs==0)return;end
[n,m]=size(X);%獲得矩陣的行列數
if(cs==1)%平移·標準差變換
for(k=1:m)xk=0;
for(i=1:n)xk=xk+X(i,k);end
xk=xk/n;sk=0;
for(i=1:n)sk=sk+(X(i,k)-xk)^2;end
sk=sqrt(sk/n);
for(i=1:n)X(i,k)=(X(i,k)-xk)/sk;end
end
elseif(cs==2)%平移·極差變換
for(k=1:m)xmin=X(1,k);xmax=X(1,k);
for(i=1:n)
if(xmin>X(i,k))xmin=X(i,k);end
if(xmax<X(i,k))xmax=X(i,k);end
end
for(i=1:n)X(i,k)=(X(i,k)-xmin)/(xmax-xmin);end
end
else%最大值規格化
A=max(X);
for(i=1:m)
X(:,i)=X(:,i)/A(i);
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -