clc;
clear?all;
close?all;
InNeuron=4;??????%輸入神經(jīng)元節(jié)點(diǎn)
HiddenNeuron=10;????%隱層神經(jīng)元節(jié)點(diǎn)
OutNeuron=3;??????%輸出神經(jīng)元節(jié)點(diǎn)
lr=0.01;???????%學(xué)習(xí)效率
E=0.0000001;?????%目標(biāo)誤差
MaxTextTimes=10000;????%最多訓(xùn)練次數(shù)
%讀入兩個(gè)文件
Train=load（‘Iris-test.txt‘）;
Train?%查看訓(xùn)練集
Train=Train（:1:4）;?
Train=Train‘;
Test=load（‘Iris-train.txt‘）;?
Test?%查看檢測(cè)集
Test=Test（:1:4）;
Test=Test‘;
%標(biāo)準(zhǔn)化輸出
SamOut=[repmat（[1;0;0]125）?repmat（[0;1;0]125）?repmat（[0;0;1]125）];%三種類型的花及相應(yīng)輸出
SamIn=Train;%開始訓(xùn)練
%歸一化
[Trainps]=mapminmax（Train01）;
Test=mapminmax（Test01）;
%設(shè)置權(quán)值與閾值（rand隨機(jī)產(chǎn)生）
W1=rand（HiddenNeuronInNeuron）;
B1=rand（HiddenNeuron1）;
W2=rand（OutNeuronHiddenNeuron）;
B2=rand（OutNeuron1）;
%誤差記錄
ErrHistory=[];
for?step=1:MaxTextTimes
????HiddenOut=logsig（W1*Train）;??%隱含層輸出
????NetworkOut=logsig（W2*HiddenOut）;??%輸出層輸出
????Error=SamOut-NetworkOut;%誤差
????SSE=sumsqr（Error）;%平方求和
????ErrHistory=[ErrHistory??SSE];
????if?SSE????%調(diào)整權(quán)值和閾值
????delta2=NetworkOut.*（1-NetworkOut）.*（SamOut-NetworkOut）;
????w=W2;
????W2=?W2+lr*（HiddenOut*delta2‘）‘;
????B2=w;%閾值
????delta1=HiddenOut.*（1-HiddenOut）.*（W2‘*delta2）;%調(diào)整隱含層加權(quán)系數(shù)
????w=W1;
????W1=W1+lr*（Train*delta1‘）‘;
????B1=w;
end
HiddenOut=logsig（W1*Test）;?%使用logsig激活函數(shù)求出隱含層輸出最終結(jié)果
NetworkOut=logsig（W2*HiddenOut）;????%使用logsig激活函數(shù)求出輸出層輸出最終結(jié)果
%將輸出層最終結(jié)果和目標(biāo)輸出結(jié)果對(duì)應(yīng)起來(lái)
NetworkOut（find（NetworkOut<=0.5））=0;
NetworkOut（find（NetworkOut>=0.5））=1;
NetworkOut%輸出網(wǎng)絡(luò)結(jié)果
%通過(guò)匹配求解出成功率
Result?=~sum（abs（NetworkOut-SamOut））;
Percent?=?sum（Result）/length（Result）

?屬性????????????大小?????日期????時(shí)間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2015-10-31?11:00??2個(gè)BPMatlab例子\BP\
?????文件????????1724??2015-10-31?16:56??2個(gè)BPMatlab例子\BP\BP.m
?????文件????????1424??2015-10-23?14:29??2個(gè)BPMatlab例子\BP\Iris-test.txt
?????文件????????1425??2015-10-23?14:29??2個(gè)BPMatlab例子\BP\Iris-train.txt
?????目錄???????????0??2018-11-14?17:00??2個(gè)BPMatlab例子\bp_class\
?????文件????????1332??2015-01-13?17:14??2個(gè)BPMatlab例子\bp_class\BP_demo.m
?????文件????????2210??2015-01-13?16:54??2個(gè)BPMatlab例子\bp_class\irisdata.mat