📄 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 + -