较好1.txt

BP算法的一个程序。有用的下棋

close all   
clear   
echo on   
clc   
% NEWFF——生成一个新的前向神经网络   
% TRAIN——对 BP 神经网络进行训练  
% SIM——对 BP 神经网络进行仿真   
pause          
%  敲任意键开始   
clc   
%  定义训练样本矢量   
% P 为输入矢量   
p = [-1:0.05:1];   
% T 为目标矢量   
t=sin(2*pi*p);
%  绘制样本数据点   
plot(p,t,'+');
title('training Vectors');
xlabel('Input Vector p');
ylabel('target Vecor t');
pause
clc
S1=5;
[w1,b1,w2,b2]=initff(p,S1,'tansig',t,'purelin');%数据初始化
echo off
w1=[3.5000;3.5000;3.5000;3.5000;3.5000];
b1=[-2.8562;1.0774;-0.5880;1.4083;2.8722];
w2=[0.2622 -0.2375 -0.4525 0.2361 -0.1718];
b2=[0.1326];
echo on
clc
df=10;  %学习过程显示频率
me=8000;    %最大训练步数
eg=0.02;    %误差指数
lr=0.01;    %学习率
tp=[df me eg lr];
[w1,b1,w2,b2,ep,tr]=trainbp(w1,b1,'tansig',w2,b2,'purelin',p,t,tp);%样本训练
pause
clc