QQ登录

只需要一步,快速开始

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

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

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

1

主题

0

听众

27

积分

升级  23.16%

该用户从未签到

新人进步奖

跳转到指定楼层
1#
发表于 2009-9-10 00:20 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
神经网络预测
/ O  {+ e7 j+ T' s% K$ g7 \) I% X/ H% 数据为1986年到2000年的交通量 ,网络为3输入,1输出
$ |7 j& C7 ^% q% S( s% 15组数据,其中9组为正常训练数据,3组为变量数据,3组为测试数据
/ v2 v& U: S5 B$ T* {+ M4 J%by akjuan: l# v6 i/ g' \; a) t& R7 w4 B9 f
%all rights preserved by www.4math.cn
4 X7 A( ~( ?2 q9 J4 f/ E: F- v/ C7 x' \All_error=[];%所有误差存储
+ c& U4 G; o4 y5 l/ v) _+ nyear=1986:2000;%数据是从1986到2000年的; D9 I7 n; Z  N6 K
p=[493 372 445;372 445 176;445 176 235;176 235 378;235 378 429;...9 R  [1 t+ V% J% e7 {
   378 429 561;429 561 651;561 651 467;651 467 527;467 527 668;...2 j* l1 I$ k5 N3 \- O5 P# i/ _' B
   527 668 841; 668 841 526;841 526 480;526 480 567;480 567 685]';%输入数据,共15组,每组3个输入
9 v0 @/ L1 m. y6 {* It=[176 235 378 429 561 651 467 527 668 841 526 480 567 685 507];%输出数据,共15组,每组1个输出3 [( }' [; J% e* s% k4 p8 {0 S
[normInput,ps] = mapminmax(p);3 r6 B% J, d1 J6 g! x( E% o
[normTarget,ts] = mapminmax(t);
7 b& X( L! a" I! z9 I4 EtestPercent = 0.20;  % Adjust as desired
3 e* E( A- _: T" u& NvalidatePercent = 0.20;  % Adust as desired4 s" _  I) a- H) M
[trainSamples,validateSamples,testSamples] = dividevec(normInput,normTarget,validatePercent,testPercent);
  F/ V9 J+ \2 I# s  G$ ifor j=1:2006 e+ h1 }  A5 s3 D
NodeNum1 = 20; % 隐层第一层节点数* l: I2 r4 L' x. h& U- Z2 \3 r0 E" s
NodeNum2=40;   % 隐层第二层节点数& e# \+ g  b, N; g& C. ?: b3 r" U
TypeNum = 1;   % 输出维数
: s3 [7 c) X2 g8 Z/ e+ `& uTF1 = 'tansig';TF2 = 'tansig'; TF3 = 'tansig';
* `1 U+ V$ w' e1 Mnet=newff(minmax(normInput),[NodeNum1,NodeNum2,TypeNum],{TF1 TF2 TF3},'traingdx');%网络创建net.trainParam.epochs=10000;%训练次数设置, b8 S) y2 A# c
net.trainParam.goal=1e-6;%训练目标设置
+ R6 Q2 n: o3 f9 P9 HPL.lr=0.01;net.trainfcn='traingdm';
; `8 \$ N7 l* H5 H& P8 l, ^[net,tr] = train(net,trainSamples.P,trainSamples.T,[],[],validateSamples,testSamples);" M  P4 l9 e* ^; E+ w- o# ~
[normTrainOutput,Pf,Af,E,trainPerf] = sim(net,trainSamples.P,[],[],trainSamples.T);%正常输入的9组p数据,BP得到的结果t
0 {0 G9 N2 Q# Y! t- G7 @( I3 |[normValidateOutput,Pf,Af,E,validatePerf] = sim(net,validateSamples.P,[],[],validateSamples.T);%用作变量3的数据p,BP得到的结果t
; |2 I5 l: W$ k2 N* z# [[normTestOutput,Pf,Af,E,testPerf] = sim(net,testSamples.P,[],[],testSamples.T);%用作测试的3组数据p,BP得到的结果t
; b1 k0 [5 j; b$ n: AtrainOutput = mapminmax('reverse',normTrainOutput,ts);%正常输入的9组p数据,BP得到的归一化后的结果t
6 K- u. A; Q% E3 l/ v' t5 ntrainInsect = mapminmax('reverse',trainSamples.T,ts);%正常输入的9组数据t
3 r: Z3 F6 }5 ^4 J$ f% O2 m/ R: yvalidateOutput = mapminmax('reverse',normValidateOutput,ts);%用作变量3的数据p,BP得到的归一化的结果t5 z4 P" q, }2 C  C5 w5 X
validateInsect = mapminmax('reverse',validateSamples.T,ts);%用作变量3的数据t
6 [: f; K6 U( B$ l$ ttestOutput = mapminmax('reverse',normTestOutput,ts);%用作变量3组数据p,BP得到的归一化的结果t
  {' p0 i( \, B0 y$ S# Q' I7 utestInsect = mapminmax('reverse',testSamples.T,ts);%用作变量3组数据t
% M: r! s! Q# q%绝对误差计算6 S4 `! f; v7 W: A0 z
absTrainError = trainOutput-trainInsect;
2 s4 P' E+ D2 j( B( TabsTestError = testOutput-testInsect;8 ?7 Z; Q+ E5 [
error_sum=sqrt(absTestError(1).^2+absTestError(2).^2+absTestError(3).^2);
6 @( C* f- V& X3 d7 ~4 a- VAll_error=[All_error error_sum];
/ I! K5 g9 _7 M  C! d( N  [- Deps=90;%其为3组测试数据的标准差,或者每个数据偏差在一定范围内而判别6 y* f8 p& g" |; p  ^
if ((abs(absTestError(1))<=30 )&(abs(absTestError(2))<=30)&(abs(absTestError(3))<=30)|(error_sum<=eps))
: \" }( |) `; v0 Hsave mynetdata net
  l) N  J) }' m     break% C! Y' h1 _+ O& C3 A
end' u5 L+ w1 V6 k0 @5 v
j
8 D9 l& F: I* p3 qend, c9 l$ s3 c3 n5 Y
问题是:- n  m( f5 l6 }; F$ B$ b
if ((abs(absTestError(1))<=30 )&(abs(absTestError(2))<=30)&(abs(absTestError(3))<=30)|(error_sum<=eps))2 `6 R" b* P4 q3 B) U1 I
中的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-6-15 06:18 , Processed in 0.449117 second(s), 63 queries .

回顶部