當(dāng)前只顯示滿足指定條件的回帖，點(diǎn)擊這里查看本話題的所有回帖

yue_shen000

新蟲 (初入文壇)

應(yīng)助: 0 (幼兒園)
金幣: 862
帖子: 30
在線: 8.7小時(shí)
蟲號(hào): 1252782
注冊(cè): 2011-04-01
專業(yè): 無(wú)機(jī)非金屬基復(fù)合材料

[求助] 求高手幫我修改BP神經(jīng)網(wǎng)絡(luò)的代碼

初學(xué)神經(jīng)網(wǎng)絡(luò)，要做畢設(shè)了。我的這段代碼有點(diǎn)問(wèn)題，參考一些書修改了幾次還是不行。求指導(dǎo)。
（figure(1)中表情那的字符是冒號(hào)和字母o的）

CODE:

%輸入訓(xùn)練數(shù)據(jù)

input_train=[10 0.1 0.1 18 60;

    10 0.1 0.1 18 70;

    10 0.1 0.1 18 80;

    10 0.2 0.2 24 60;

    10 0.2 0.2 24 70;

    10 0.2 0.2 24 80;

    10 0.5 0.4 30 60;

    10 0.5 0.4 30 70;

    10 0.5 0.4 30 80;

    13 0.1 0.1 30 60;

    13 0.1 0.2 30 70;

    13 0.1 0.4 30 80;

    13 0.3 0.1 18 60;

    13 0.2 0.2 18 70;

    13 0.2 0.4 18 80;

    13 0.5 0.1 24 60;

    13 0.5 0.2 24 70;

    13 0.5 0.4 24 80;

    16 0.1 0.4 24 60;

    16 0.1 0.4 24 70;

    16 0.1 0.4 24 80;

    16 0.2 0.1 30 60;

    16 0.2 0.1 30 70;

    16 0.2 0.1 30 80;

    16 0.5 0.2 18 60;

    16 0.5 0.2 18 70;

    16 0.5 0.2 18 80];

%訓(xùn)練目標(biāo)向量

output_train=[0.62 0.65 0.65 0.69 0.59 0.52 0.57 0.58 0.42 0.64 0.71 0.75 0.68 0.54 0.57 0.87 0.52 0.52 0.75 0.68 

0.71 0.64 0.86 0.95 0.68 0.57 0.52];

%測(cè)試樣本

input_test=[10 0.5 0.2 18 80;

    8 0.7 0.3 18 80;

    16 0.1 0.1 30 60;

    18 0.05 0.05 36 60];

%測(cè)試目標(biāo)

output_test=[0.54 0.42 0.71 0.9];

%訓(xùn)練數(shù)據(jù)歸一化

[inputn,inputps]=mapminmax(input_train);

[outputn,outputps]=mapminmax(output_train);

%創(chuàng)建網(wǎng)絡(luò)參數(shù)

net=newff(inputn,outputn,[10,1],{'tansig','purelin'},'trainlm');

net.trainparam.show=300;

net.trainparam.mc=0.9;

net.trainparam.lr=0.05;

net.trainparam.epochs=2000;

net.trainparam.goal=0.0001;

%BP神經(jīng)網(wǎng)絡(luò)訓(xùn)練

[net,tr]=train(net,inputn,outputn);

%預(yù)測(cè)數(shù)據(jù)歸一化

inputn_test=mapminmax('apply',input_test,inputps);

%BP神經(jīng)網(wǎng)絡(luò)預(yù)測(cè)輸出

an=sim(net,inputn_test);

%輸出結(jié)果反歸一化

BPoutput=mapminmax('reverse',an,outputps);

figure(1)

plot(BPoutput,':og')

hold on

plot(output_test,'-*');

legend('預(yù)測(cè)輸出','期望輸出')

title('BP網(wǎng)絡(luò)預(yù)測(cè)輸出','fontsize',12)

ylabel('函數(shù)輸出','fontsize',12)

xlabel('樣本','fontsize',12)

%預(yù)測(cè)誤差

error=BPoutput-output_test;

figure(2)

plot(error,'-*')

title('BP網(wǎng)絡(luò)預(yù)測(cè)誤差','fontsize',12)

ylabel('誤差','fontsize',12)

xlabel('樣本','fontsize',12)

figure(3)

plot((output_test-BPoutput)./BPoutput,'-*');

title('神經(jīng)網(wǎng)絡(luò)預(yù)測(cè)誤差百分比')

[ Last edited by xiegangmai on 2012-5-13 at 23:08 ]

回復(fù)此樓

1樓 2012-05-12 10:44:06

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

jswoo

鐵桿木蟲 (著名寫手)

阿拉多夢(mèng)

仿真EPI: 2
應(yīng)助: 37 (小學(xué)生)
金幣: 7511.9
散金: 3801
紅花: 26
帖子: 2221
在線: 1210.1小時(shí)
蟲號(hào): 770961
注冊(cè): 2009-05-15
性別: GG
專業(yè): 傳熱傳質(zhì)學(xué)

【答案】應(yīng)助回帖

★ ★
臭水溝: 金幣+2, 謝謝交流~~ 2012-05-13 11:02:32
yue_shen000: 回帖置頂 2012-05-13 14:52:59

程序基本可行，主要是輸入輸出矩陣出了問(wèn)題，注意矩陣的行列，另外由于數(shù)據(jù)少，預(yù)測(cè)的效果不是很好

贊一下

回復(fù)此樓

4樓2012-05-13 10:19:27

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

查看全部 9 個(gè)回答

yue_shen000

新蟲 (初入文壇)

應(yīng)助: 0 (幼兒園)
金幣: 862
帖子: 30
在線: 8.7小時(shí)
蟲號(hào): 1252782
注冊(cè): 2011-04-01
專業(yè): 無(wú)機(jī)非金屬基復(fù)合材料

大家?guī)蛶兔Π�，感激不盡。。。

贊一下

回復(fù)此樓

2樓2012-05-12 21:25:41

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

jswoo

鐵桿木蟲 (著名寫手)

阿拉多夢(mèng)

仿真EPI: 2
應(yīng)助: 37 (小學(xué)生)
金幣: 7511.9
散金: 3801
紅花: 26
帖子: 2221
在線: 1210.1小時(shí)
蟲號(hào): 770961
注冊(cè): 2009-05-15
性別: GG
專業(yè): 傳熱傳質(zhì)學(xué)

【答案】應(yīng)助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感謝參與，應(yīng)助指數(shù) +1
yue_shen000: 金幣+40, ★★★★★最佳答案, 很好 2012-05-13 14:52:36
yue_shen000: 回帖置頂 2012-05-13 14:53:38
xiegangmai: 金幣+2, 謝謝應(yīng)助！ 2012-05-13 23:09:03

CODE:

%輸入訓(xùn)練數(shù)據(jù)

input_train=[10 0.1 0.1 18 60;

    10 0.1 0.1 18 70;

    10 0.1 0.1 18 80;

    10 0.2 0.2 24 60;

    10 0.2 0.2 24 70;

    10 0.2 0.2 24 80;

    10 0.5 0.4 30 60;

    10 0.5 0.4 30 70;

    10 0.5 0.4 30 80;

    13 0.1 0.1 30 60;

    13 0.1 0.2 30 70;

    13 0.1 0.4 30 80;

    13 0.3 0.1 18 60;

    13 0.2 0.2 18 70;

    13 0.2 0.4 18 80;

    13 0.5 0.1 24 60;

    13 0.5 0.2 24 70;

    13 0.5 0.4 24 80;

    16 0.1 0.4 24 60;

    16 0.1 0.4 24 70;

    16 0.1 0.4 24 80;

    16 0.2 0.1 30 60;

    16 0.2 0.1 30 70;

    16 0.2 0.1 30 80;

    16 0.5 0.2 18 60;

    16 0.5 0.2 18 70;

    16 0.5 0.2 18 80]';

%訓(xùn)練目標(biāo)向量

output_train=[0.62 0.65 0.65 0.69 0.59 0.52 0.57 0.58 0.42 0.64 0.71 0.75 0.68 0.54 0.57 0.87 0.52 0.52 0.75 0.68 0.71 0.64 0.86 0.95 0.68 0.57 0.52];

%測(cè)試樣本

input_test=[10 0.5 0.2 18 80;

    8 0.7 0.3 18 80;

    16 0.1 0.1 30 60;

    18 0.05 0.05 36 60]';

%測(cè)試目標(biāo)

output_test=[0.54 0.42 0.71 0.9];

%訓(xùn)練數(shù)據(jù)歸一化

[inputn,inputps]=mapminmax(input_train);

[outputn,outputps]=mapminmax(output_train);

%創(chuàng)建網(wǎng)絡(luò)參數(shù)

net=newff(inputn,outputn,[8,8],{'tansig','purelin'},'trainlm');

net.trainparam.show=300;

net.trainparam.mc=0.9;

net.trainparam.lr=0.05;

net.trainparam.epochs=200;

net.trainparam.goal=0.001;

%BP神經(jīng)網(wǎng)絡(luò)訓(xùn)練

[net,tr]=train(net,inputn,outputn);

%預(yù)測(cè)數(shù)據(jù)歸一化

inputn_test=mapminmax('apply',input_test,inputps);

%BP神經(jīng)網(wǎng)絡(luò)預(yù)測(cè)輸出

an=sim(net,inputn_test);

%輸出結(jié)果反歸一化

BPoutput=mapminmax('reverse',an,outputps);

figure(1)

plot(BPoutput,'g')

hold on

plot(output_test,'-*');

legend('預(yù)測(cè)輸出','期望輸出')

title('BP網(wǎng)絡(luò)預(yù)測(cè)輸出','fontsize',12)

ylabel('函數(shù)輸出','fontsize',12)

xlabel('樣本','fontsize',12)

%預(yù)測(cè)誤差

error=BPoutput-output_test;

figure(2)

plot(error,'-*')

title('BP網(wǎng)絡(luò)預(yù)測(cè)誤差','fontsize',12)

ylabel('誤差','fontsize',12)

xlabel('樣本','fontsize',12)

figure(3)

plot((output_test-BPoutput)./BPoutput,'-*');

title('神經(jīng)網(wǎng)絡(luò)預(yù)測(cè)誤差百分比')

贊一下

回復(fù)此樓

3樓2012-05-13 10:17:25

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

yue_shen000

新蟲 (初入文壇)

應(yīng)助: 0 (幼兒園)
金幣: 862
帖子: 30
在線: 8.7小時(shí)
蟲號(hào): 1252782
注冊(cè): 2011-04-01
專業(yè): 無(wú)機(jī)非金屬基復(fù)合材料

引用回帖:

4樓: Originally posted by jswoo at 2012-05-13 10:19:27:
程序基本可行，主要是輸入輸出矩陣出了問(wèn)題，注意矩陣的行列，另外由于數(shù)據(jù)少，預(yù)測(cè)的效果不是很好

怎么改呢？

回復(fù)此樓

5樓2012-05-13 14:44:36

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

最具人氣熱帖推薦 [查看全部]	作者	回/看	最后發(fā)表

[考研] 接收2026碩士調(diào)劑(學(xué)碩+專碩) +3	allen-yin 2026-03-23	3/150	2026-03-23 11:29 by 奶油草莓.
[考研] 材料與化工考研調(diào)劑 +3	孅華 2026-03-22	3/150	2026-03-23 11:20 by barlinike
[考研] 336化工調(diào)劑 +3	王大坦1 2026-03-23	4/200	2026-03-23 11:07 by laoshidan
[考研] 291 求調(diào)劑 +4	化工2026屆畢業(yè)?/a> 2026-03-21	4/200	2026-03-23 09:59 by bingchuan
[考研] 315分，誠(chéng)求調(diào)劑，材料與化工085600 +3	13756423260 2026-03-22	3/150	2026-03-22 20:11 by edmund7
[考研] 求調(diào)劑院校信息 +6	CX 330 2026-03-21	6/300	2026-03-22 15:25 by 無(wú)懈可擊111
[考研] 0856材料專碩353求調(diào)劑 +4	NIFFFfff 2026-03-20	4/200	2026-03-22 09:49 by 2026paper
[基金申請(qǐng)] 山東省面上項(xiàng)目限額評(píng)審 +4	石瑞0426 2026-03-19	4/200	2026-03-22 08:50 by Wei_ren
[考研] 297求調(diào)劑 +3	喜歡還是不甘心 2026-03-20	3/150	2026-03-21 18:33 by 學(xué)員8dgXkO
[考研] 313求調(diào)劑 +4	肆叁貳壹22 2026-03-19	4/200	2026-03-21 17:33 by ColorlessPI
[考研] 266求調(diào)劑 +3	哇呼哼呼哼 2026-03-20	3/150	2026-03-21 16:46 by barlinike
[考研] 材料與化工（0856）304求 B區(qū) 調(diào)劑 +3	邱gl 2026-03-21	3/150	2026-03-21 13:47 by lature00
[考研] 求調(diào)劑 +3	白QF 2026-03-21	3/150	2026-03-21 13:12 by zhukairuo
[考研] 機(jī)械專碩299求調(diào)劑至材料 +3	kkcoco25 2026-03-16	4/200	2026-03-21 03:52 by JourneyLucky
[考研] 265求調(diào)劑 +3	Jack?k?y 2026-03-17	3/150	2026-03-21 03:17 by JourneyLucky
[考研] 330求調(diào)劑 +4	小材化本科 2026-03-18	4/200	2026-03-20 23:13 by JourneyLucky
[考研] 一志愿南京航空航天大學(xué)大學(xué) ，080500材料科學(xué)與工程學(xué)碩 +5	@taotao 2026-03-20	5/250	2026-03-20 20:16 by JourneyLucky
[考研] 086500 325 求調(diào)劑 +3	領(lǐng)帶小熊 2026-03-19	3/150	2026-03-20 18:38 by 盡舜堯1
[考研] 085410人工智能專碩317求調(diào)劑（0854都可以） +4	xbxudjdn 2026-03-18	4/200	2026-03-20 09:07 by 不168
[考研] 283求調(diào)劑 +3	聽(tīng)風(fēng)就是雨； 2026-03-16	3/150	2026-03-17 07:41 by 熱情沙漠