神經(jīng)網(wǎng)絡(luò)具體指什么？誰有具體的源程序？謝謝

神經(jīng)網(wǎng)絡(luò)就是通過權(quán)值調(diào)整來做一些比如逼近任何非線性函數(shù)的網(wǎng)絡(luò)。
這是bp算法求疑惑問題的源程序。
%%%2-2-1Bp網(wǎng)絡(luò)求異或問題%%%
clear;
lr=0.1; %學(xué)習(xí)速率
eps=0.0001; %精度
times=20000;
result=zeros(1,4);
p=[0 0 1 1;0 1 0 1]; %輸入
t=[0 1 0 1]; %參考輸出
w1=rand(2,2); %權(quán)值初始化
b1=rand(2,1);
w2=rand(2,1);
b2=rand(1);
for i=1:times;
error=0;
cw1=zeros(size(w1));
cb1=zeros(size(b1));
cw2=zeros(size(w2));
cb2=zeros(size(b2));
for j=1:4;
hl=w1'*p(:,j)+b1;
hlo=1./(1+exp(-hl)); %隱含層作用函數(shù)
ol=w2'*hlo+b2;
deta=t(j)-ol;
cw2=cw2+lr*deta*hlo;
cb2=cb2+lr*deta;
deta2=hlo.*(1-hlo).*w2*deta; %隱含層作用函數(shù)的反函數(shù)
cb1=cb1+lr*deta2;
cw1=cw1+lr*p(:,j)*deta2';
error=error+0.5*(t(j)-ol)*(t(j)-ol);
end
w1=w1+cw1;b1=b1+cb1;%權(quán)值調(diào)整
w2=w2+cw2;b2=b2+cb2;
if error break; %檢驗(yàn)精度
end;
end;
for j=1:4; %訓(xùn)練完之后檢驗(yàn)結(jié)果
hl=w1'*p(:,j)+b1;
hlo=1./(1+exp(-hl));
ol=w2'*hlo+b2;
result(j)=ol;
end;
error,i,result %結(jié)果輸出