try1.m

使用单层神经网络对中国国有企业的产值数据进行预测

P=-1:0.2:1;
T=[-0.1882 -1 0.2588 0.9412 0.3294 0.7882 -0.5059 0.0118 1 0.4 0.8];
P2=-1:0.025:1;
[R,Q]=size(P);  [S2,Q]=size(T);  S1=5;
[W1,B1]=rands(S1,R);
[W2,B2]=rands(S2,S1);
A2=purelin(W2*tansig(W1*P2,B1),B2);

disp_fqre=10;  max_epoch=8000;  err_goal=0.02;  lr=0.01;
TP=[disp_fqre max_epoch err_goal lr];
trainbp(W1,B1,'tansig',W2,B2,'purelin',P,T,TP)

Q1=[1.2]
A1=tansig(W1*Q1,B1);
A2=purelin(W2*A1,B2);
SSE=sumsqr(T-purelin(W2*tansig(W1*P,B1),B2));
W1
W2