p6.32.txt

来自「Matlab_Network_and_Application是国防工业出版社董长」· 文本 代码 · 共 33 行

%目标
T=[+1 -1;-1 +1];
%显示
plot(T(1,:),T(2,:),'r*')
axis([-1.1 1.1 -1.1 1.1])
title('Hopfield网络状态空间')
xlabel('a(1)');
ylabel('a(2)');
%设计网络
net=newhop(T);
%验证
[Y,Pf,Af]=sim(net,2,[],T);
Y
%rand(2,1)返回2*1矩阵（均匀分布），rands(2,1)返回2*1矩阵（系统初始函数）
a={rands(2,1)};
[y,Pf,Af]=sim(net,{1 20},{},a);
record=[cell2mat(a) cell2mat(y)];
start=cell2mat(a);
hold on
plot(start(1,1),start(2,1),'bx',record(1,:),record(2,:))
%伪平衡点
plot(0,0,'ko');
P=[-1.0 -0.5 0.0 +0.5 +1.0;-1.0 -0.5 0.0 +0.5 +1.0];
color='rgbmy';
%过程显示
for i=1:5
a={P(:,i)};
[y,Pf,Af]=sim(net,{1 20},{},a);
record=[cell2mat(a) cell2mat(y)];
start=cell2mat(a);
plot(start(1,1),start(2,1),'kx',record(1,:),record(2,:))
drawnow
end