l7.2.txt

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

%向量获取
P=[1 0];
T=[0.1826 0.6325;0.3651 0.3162;0.5477 0.3162;0.7303 0.6325];
%网络初始化
[R,Q]=size(P);
[S,Q]=size(T);
W=zeros(S,R);
max_epoch=10;
lp.lr=0.3;
%Outstar网络训练
for epoch=1:max_epoch
for q=1:Q
A=T(:,q);
dW=learnos(W,P(:,q),[],[],A,[],[],[],[],[],lp,[]);
W=W+dW;
end
end
%记忆
Ptest=[1];
A=purelin(W*Ptest)