📄 p131_66kohonen_network.m
字号:
% Kohonen network
P=rands(2,2000);
P=pnormc(P);
X=5;Y=5;S=X*Y,
[R,Q]=size(P);
W0=randnr(S,R)*0.1
pause
W=W0;
%plotmap(W0,'neighb2d',[X Y]);
max_cycle=4000; % 设置最大循环次数
disp_freq=100;
lr=0.3;
max_neighb=max([X Y])-1;
% 训练网络、修正权值
hold on
pause
TF=[disp_freq max_cycle lr max_neighb];
%W=trainsm(W,P,TF);
W=trainsm(W,P,TF);
W0,W
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -