p114_instar.m

竞争网络的matlab程序

% instar
P=[.1826 .6325;.3651 .3162;.5477 .3162;.7303 .6325];
T=[1  0 ];
[R,Q]=size(P);[S,Q]=size(T);
[W]=zeros(S,R);
B=-0.95*ones(S,1);
max_epoch=10;              % 设置最大循环次数
lr=0.7;
% 训练网络、修正权值
for epoch=1:max_epoch
    for q=1:Q
        A=T(:,q);
        dW=learnis(W,P(:,q),A,lr)
        W=W+dW
        pause
    end
    W
end