QQ登录

只需要一步,快速开始

 注册地址  找回密码
查看: 3173|回复: 1
打印 上一主题 下一主题

[代码资源] 一matlab程序中一点点的小问题

[复制链接]
字体大小: 正常 放大
yychanaz        

1

主题

0

听众

27

积分

升级  23.16%

该用户从未签到

新人进步奖

跳转到指定楼层
1#
发表于 2009-9-10 00:20 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
神经网络预测
' g" @$ C% a: Q( F% 数据为1986年到2000年的交通量 ,网络为3输入,1输出; d* Z* G# {9 o& c( }, s, Z
% 15组数据,其中9组为正常训练数据,3组为变量数据,3组为测试数据
- {. l' j" j2 E5 d+ @%by akjuan
9 u. }" ^/ `" R6 a# i) z8 L%all rights preserved by www.4math.cn, Y4 I3 }9 N$ j/ W4 h. `9 @$ T/ h; i( x
All_error=[];%所有误差存储8 w" O  Z3 s9 t9 C& w
year=1986:2000;%数据是从1986到2000年的; o" z. E# [4 G/ V
p=[493 372 445;372 445 176;445 176 235;176 235 378;235 378 429;...7 @# N5 @7 Y+ {+ g; G
   378 429 561;429 561 651;561 651 467;651 467 527;467 527 668;...4 i9 M$ z7 c% W' G! v& q7 c
   527 668 841; 668 841 526;841 526 480;526 480 567;480 567 685]';%输入数据,共15组,每组3个输入
2 z9 A4 q5 N4 t" g! k$ It=[176 235 378 429 561 651 467 527 668 841 526 480 567 685 507];%输出数据,共15组,每组1个输出5 V$ q1 u$ M; A9 U" ~' l& `
[normInput,ps] = mapminmax(p);, h% G" O3 E: R* C% z2 b
[normTarget,ts] = mapminmax(t);4 c" D0 X/ j8 d) k9 ?0 i
testPercent = 0.20;  % Adjust as desired
* {' R. \* G' r& JvalidatePercent = 0.20;  % Adust as desired
  {* g) J: i: o% I0 |9 Q+ s[trainSamples,validateSamples,testSamples] = dividevec(normInput,normTarget,validatePercent,testPercent);
# R" j; ]* s7 e0 @1 X. `for j=1:200
) g5 F& T/ o: q1 ^, YNodeNum1 = 20; % 隐层第一层节点数2 i  E1 X' J! J; Q' b& k
NodeNum2=40;   % 隐层第二层节点数* j. p& D5 Q7 q& t  ^$ W
TypeNum = 1;   % 输出维数3 C5 K2 W. b3 h! `4 m
TF1 = 'tansig';TF2 = 'tansig'; TF3 = 'tansig';* `( {0 ^7 ]; B! q
net=newff(minmax(normInput),[NodeNum1,NodeNum2,TypeNum],{TF1 TF2 TF3},'traingdx');%网络创建net.trainParam.epochs=10000;%训练次数设置
- b% c9 T0 q- U& N- unet.trainParam.goal=1e-6;%训练目标设置
* G: q& H2 o- D4 T/ }- d7 jPL.lr=0.01;net.trainfcn='traingdm';, R$ @% ?" ]7 l3 V% L0 Y; d7 h  n
[net,tr] = train(net,trainSamples.P,trainSamples.T,[],[],validateSamples,testSamples);
& D& x6 r3 f% O# f[normTrainOutput,Pf,Af,E,trainPerf] = sim(net,trainSamples.P,[],[],trainSamples.T);%正常输入的9组p数据,BP得到的结果t
. q7 ^* ?& s! {) h# i, u" ]3 E[normValidateOutput,Pf,Af,E,validatePerf] = sim(net,validateSamples.P,[],[],validateSamples.T);%用作变量3的数据p,BP得到的结果t& s/ ?3 s9 b" Y; x% y
[normTestOutput,Pf,Af,E,testPerf] = sim(net,testSamples.P,[],[],testSamples.T);%用作测试的3组数据p,BP得到的结果t
2 f% \9 v$ z/ Z- g7 dtrainOutput = mapminmax('reverse',normTrainOutput,ts);%正常输入的9组p数据,BP得到的归一化后的结果t8 p" `& u! K/ D" X
trainInsect = mapminmax('reverse',trainSamples.T,ts);%正常输入的9组数据t
3 i. d& s( L* _validateOutput = mapminmax('reverse',normValidateOutput,ts);%用作变量3的数据p,BP得到的归一化的结果t
, ~, H. Y/ N$ X2 T* w# O9 ivalidateInsect = mapminmax('reverse',validateSamples.T,ts);%用作变量3的数据t* E. i% u$ _9 y
testOutput = mapminmax('reverse',normTestOutput,ts);%用作变量3组数据p,BP得到的归一化的结果t2 e6 `5 a" k( N- h4 g
testInsect = mapminmax('reverse',testSamples.T,ts);%用作变量3组数据t
; ]& ~; b' ?$ z; t; }# W* f%绝对误差计算
8 x6 J3 _3 F  t5 u8 @9 DabsTrainError = trainOutput-trainInsect;/ k# Y. |! r+ j7 V. P- e8 ?
absTestError = testOutput-testInsect;% Z% |/ E5 c9 A% V
error_sum=sqrt(absTestError(1).^2+absTestError(2).^2+absTestError(3).^2);
, ^: T3 o, y! o/ IAll_error=[All_error error_sum];
2 C* s* ], b' [eps=90;%其为3组测试数据的标准差,或者每个数据偏差在一定范围内而判别
: k3 x4 n6 _4 A9 Qif ((abs(absTestError(1))<=30 )&(abs(absTestError(2))<=30)&(abs(absTestError(3))<=30)|(error_sum<=eps))
5 ]$ E9 {3 w% i" N! F5 {save mynetdata net9 g1 D7 d# |* Y- A! s6 e
     break# R& |0 I& }7 C1 Z6 O/ w# F; N8 I
end' z) O7 K4 F. l" c) ]
j
* T. Z) l  @9 y- q) v4 cend
- w- a) r% |& }8 k+ n% {问题是:5 C% F; m7 d6 u$ G2 j
if ((abs(absTestError(1))<=30 )&(abs(absTestError(2))<=30)&(abs(absTestError(3))<=30)|(error_sum<=eps))
/ f5 n% b( k0 F5 r9 b% {# r中的30是怎么算出来的啊
zan
转播转播0 分享淘帖0 分享分享0 收藏收藏1 支持支持1 反对反对0 微信微信

10

主题

4

听众

108

积分

升级  4%

该用户从未签到

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册地址

qq
收缩
  • 电话咨询

  • 04714969085
fastpost

关于我们| 联系我们| 诚征英才| 对外合作| 产品服务| QQ

手机版|Archiver| |繁體中文 手机客户端  

蒙公网安备 15010502000194号

Powered by Discuz! X2.5   © 2001-2013 数学建模网-数学中国 ( 蒙ICP备14002410号-3 蒙BBS备-0002号 )     论坛法律顾问:王兆丰

GMT+8, 2026-4-12 03:06 , Processed in 0.446015 second(s), 68 queries .

回顶部