%提供訓練集和目標值
X=-1:0.1:1;T=sin(pi*X);
plot(X,T,'+');
%建立網絡，并得權值和偏值
[R,N]=size(X);
[S2,N]=size(T);
S1=5;
[W1,b1,W2,b2]=initff(X,S1,'tansig',S2,'purelin');
[y1,y2]=simuff(X,W1,b1,'tansig',W2,b2,'purelin');
%利用不含噪聲的理想輸入數據訓練網絡
disp_freg=10;%顯示間隔
max_epoch=8000;%訓練時間
err_goal=0.02;%訓練目標誤差
lr=0.01;%學習速率
tp=[disp_freg max_epoch err_goal lr];
[W1,b1,W2,b2,te,tr]=trainbp(W1,b1,'tansig',W2,b2,'purelin',X,T,tp);
[y1,y22]=simuff(X,W1,b1,'tansig',W2,b2,'purelin');
plot(X,T,'-',X,y21,'--',X,y22,'o')
X1=0.5;y2=simuff(X1,W1,b1,'tansig',W2,b2,'purelin')