資源描述：
《BP神經(jīng)網(wǎng)絡(luò)matlab源程序代碼.doc》由會員上傳分享，免費在線閱讀，更多相關(guān)內(nèi)容在行業(yè)資料-天天文庫。
1、BP神經(jīng)網(wǎng)絡(luò)matlab源程序代碼）%******************************%學習程序%******************************%%======原始數(shù)據(jù)輸入========p=[284528334488;283344884554;448845542928;455429283497;292834972261;...349722616921;226169211391;692113913580;139135804451;358044512636;...44512
2、6363471;263634713854;347138543556;385435562659;355626594335;...265943352882;433528824084;433528821999;288219992889;199928892175;...288921752510;217525103409;251034093729;340937293489;372934893172;...348931724568;317245684015;]';%===========期望輸出=======
3、t=[4554292834972261692113913580445126363471385435562659...4335288240841999288921752510340937293489317245684015...3666];ptest=[284528334488;283344884554;448845542928;455429283497;292834972261;...349722616921;226169211391;692113913580;139135804451;35804
4、4512636;...445126363471;263634713854;347138543556;385435562659;355626594335;...265943352882;433528824084;433528821999;288219992889;199928892175;...288921752510;217525103409;251034093729;340937293489;372934893172;...348931724568;317245684015;4568401536
5、66]';[pn,minp,maxp,tn,mint,maxt]=premnmx(p,t);%將數(shù)據(jù)歸一化NodeNum1=4;%隱層第一層節(jié)點數(shù)NodeNum2=7;%隱層第二層節(jié)點數(shù)TypeNum=5;%輸出維數(shù)TF1='tansig';TF2='tansig';TF3='tansig';net=newff(minmax(pn),[NodeNum1,NodeNum2,TypeNum],{TF1TF2TF3},'traingdx');%網(wǎng)絡(luò)創(chuàng)建traingdmnet.trainParam.sho
6、w=50;net.trainParam.epochs=50000;%訓練次數(shù)設(shè)置net.trainParam.goal=1e-5;%訓練所要達到的精度net.trainParam.lr=0.01;%學習速率net.trainParam.mc=0.9;net.trainParam.lr_inc=1.05;net.trainParam.lr_dec=0.7;net.trainParam.max_perf_inc=1.04;net=train(net,pn,tn);p2n=tramnmx(ptest,m
7、inp,maxp);%測試數(shù)據(jù)的歸一化an=sim(net,p2n);[a]=postmnmx(an,mint,maxt)%數(shù)據(jù)的反歸一化，即最終想得到的預測結(jié)果plot(1:length(ttest),ttest,'o',1:length(ttest),a,'+');title('o表示預測值---*表示實際值')gridon%m=length(a);%向量a的長度%t1=[t,a(m)];error=ttest-a;%誤差向量figureplot(1:length(error),error,'
8、-.')title('誤差變化圖')gridon[pn,minp,maxp,tn,mint,maxt]=premnmx(p,t);%??êy?Y1éò??ˉNodeNum1=4;%òt2?μúò?2??úμ?êyNodeNum2=7;%òt2?μú?t2??úμ?êyTypeNum=5;%ê?3???êyTF1='tansig';TF2='tansig';TF3='tansig';net=newff(minmax(pn),[NodeNum1,NodeNum2,TypeNum],{T
