try_1.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);
%W1=[0.5950 -0.0934 -0.5786 0.4705 0.1548];
%W1=W1';
%B1=[0.4470 -0.7639 0.0397 0.9903 -0.3733];
%B1=B1';
%W2=[-0.7522 0.0150 -0.7889 -0.9418 -0.8986];
%B2=[0.3130];
%A2=purelin(W2*tansig(W1*P2,B1),B2);

disp_fqre=10;  max_epoch=4000;  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