?? bsb.m
字號:
function c=bsb(x,beta,multi)
%==============================================================
% 盒中腦(bsb)神經網絡模型首先由Anderson等人于1977年提出,
% Golden等人對該模型進行了深入的研究。可用作自聯想最鄰分類器,
% 并可存儲任何模擬向量模式。
% Input:
% x : input vector
% beta : feedback factor
% Output:
% c : number of iterations required for convergence
%==============================================================
% Example:
% x=[0.5;-0.6];
% beta=0.5;
% c=100;bsb(x,beta,c)
% 結果表示
hold on
flag=0;
x=x(:);
c=2;
W=[0.035 -.005;
-.005 .035];
set(gca,'YLim',[-1 1]);
set(gca,'XLim',[-1 1]);
plot(x(1),x(2),'ob')
orig=x';
plot([0,0],[1,-1],'-')
plot([1,-1],[0,0],'-')
set(gca,'YTick',[-1 1]);
set(gca,'XTick',[-1 1]);
while flag<1
y=x+beta*W*x;
x=(y(:,:)<-1)*(-1)+(y(:,:)>1)+(y(:,:)>-1 & y(:,:)<1).*y;
u(c,:)=x';
c=c+1;
if u(c-1,:)==u(c-2,:),
flag=10;
c=c-3;
end
end
u=u(2:c+1,:);
fprintf('\n網絡初始值x:%f',orig(1));
fprintf('\n網絡初始值y:%f',orig(2));
plot([orig(1,1) u(1,1)],[orig(1,2) u(1,2)],'-b');
plot(u(:,1),u(:,2),'ob')
plot(u(:,1),u(:,2),'-b')
drawnow
fprintf(1,'',c);
set(gca,'Box','on')
hold off
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -