QQ登录

只需要一步,快速开始

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

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

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

1

主题

0

听众

27

积分

升级  23.16%

该用户从未签到

新人进步奖

跳转到指定楼层
1#
发表于 2009-9-10 00:20 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
神经网络预测' p, t2 d" y+ T5 K& Y7 H2 R* }
% 数据为1986年到2000年的交通量 ,网络为3输入,1输出
  S+ b/ v; Y) e6 M% 15组数据,其中9组为正常训练数据,3组为变量数据,3组为测试数据) U) H' z' O2 c& r' `8 E
%by akjuan# X! \7 S7 E) R8 W% K! F8 ^
%all rights preserved by www.4math.cn& Q% D8 v8 O: q6 [# _4 j+ S/ N( b7 ^
All_error=[];%所有误差存储+ P, e- h( Y9 A# Z% n- K2 z
year=1986:2000;%数据是从1986到2000年的
( ~* G( T( h+ cp=[493 372 445;372 445 176;445 176 235;176 235 378;235 378 429;...3 k2 @$ d; y0 y+ m5 {
   378 429 561;429 561 651;561 651 467;651 467 527;467 527 668;...
. U" {* r+ ?6 H) G- H8 I   527 668 841; 668 841 526;841 526 480;526 480 567;480 567 685]';%输入数据,共15组,每组3个输入/ d4 m- I" v4 G7 l8 @4 \/ A+ g
t=[176 235 378 429 561 651 467 527 668 841 526 480 567 685 507];%输出数据,共15组,每组1个输出
! R' _% @. }1 u- m+ l2 c9 h[normInput,ps] = mapminmax(p);7 Q# t, a- h$ S# ~( h+ v
[normTarget,ts] = mapminmax(t);7 a7 ]; {' s; s* W) D. [
testPercent = 0.20;  % Adjust as desired
/ d- @$ O) S! g1 H0 H: \# NvalidatePercent = 0.20;  % Adust as desired
& s3 n7 I9 X4 X- k[trainSamples,validateSamples,testSamples] = dividevec(normInput,normTarget,validatePercent,testPercent);
1 Z; P9 @1 e  c# m% U( ], J. Ifor j=1:200, E% d2 h; D, g/ M8 ]
NodeNum1 = 20; % 隐层第一层节点数2 u* `+ Y; z$ _
NodeNum2=40;   % 隐层第二层节点数2 Y: ?: {' u% N. N4 q4 u
TypeNum = 1;   % 输出维数
/ X" u( o- H6 \$ s6 C% PTF1 = 'tansig';TF2 = 'tansig'; TF3 = 'tansig';
, H9 \2 D$ \+ q7 j6 Mnet=newff(minmax(normInput),[NodeNum1,NodeNum2,TypeNum],{TF1 TF2 TF3},'traingdx');%网络创建net.trainParam.epochs=10000;%训练次数设置
+ d5 N; K1 h# W- qnet.trainParam.goal=1e-6;%训练目标设置, a' }" G5 A  S: m" o/ ~
PL.lr=0.01;net.trainfcn='traingdm';6 ]2 w$ D$ [8 l' i  U5 f
[net,tr] = train(net,trainSamples.P,trainSamples.T,[],[],validateSamples,testSamples);
0 o; y+ E2 t; P0 r; Z$ ^[normTrainOutput,Pf,Af,E,trainPerf] = sim(net,trainSamples.P,[],[],trainSamples.T);%正常输入的9组p数据,BP得到的结果t- E4 J2 D$ R& t+ c. y
[normValidateOutput,Pf,Af,E,validatePerf] = sim(net,validateSamples.P,[],[],validateSamples.T);%用作变量3的数据p,BP得到的结果t
2 Y% S( O+ c' ^9 \3 T2 @' H[normTestOutput,Pf,Af,E,testPerf] = sim(net,testSamples.P,[],[],testSamples.T);%用作测试的3组数据p,BP得到的结果t  V. u& Y+ v7 E
trainOutput = mapminmax('reverse',normTrainOutput,ts);%正常输入的9组p数据,BP得到的归一化后的结果t1 {. ]+ o: L5 t5 M( Q
trainInsect = mapminmax('reverse',trainSamples.T,ts);%正常输入的9组数据t3 U3 j- O. A% w, W  o7 W
validateOutput = mapminmax('reverse',normValidateOutput,ts);%用作变量3的数据p,BP得到的归一化的结果t& x# v6 }- I2 ?4 j# g: i
validateInsect = mapminmax('reverse',validateSamples.T,ts);%用作变量3的数据t
; y/ w! o5 C8 z" `testOutput = mapminmax('reverse',normTestOutput,ts);%用作变量3组数据p,BP得到的归一化的结果t
5 j' a" X2 z" \- c8 dtestInsect = mapminmax('reverse',testSamples.T,ts);%用作变量3组数据t
5 P0 k  a2 B5 Q; F+ _* [' r%绝对误差计算/ R( H) U# G0 ~$ @
absTrainError = trainOutput-trainInsect;
! C& V, v$ o8 z2 A( U0 @absTestError = testOutput-testInsect;! v: k0 {  b: V
error_sum=sqrt(absTestError(1).^2+absTestError(2).^2+absTestError(3).^2);
* S4 P$ Z( h: H: `5 a; m! H6 dAll_error=[All_error error_sum];
( P; D+ l* ?( ~9 ]. K* E2 h3 Q( oeps=90;%其为3组测试数据的标准差,或者每个数据偏差在一定范围内而判别
9 _- y- U) _( ~* _! j8 Dif ((abs(absTestError(1))<=30 )&(abs(absTestError(2))<=30)&(abs(absTestError(3))<=30)|(error_sum<=eps))
0 N% s( g5 T, d/ t- dsave mynetdata net
) v" o) p+ }9 {# H: _. ?& U     break2 ~# {: }, l4 k8 }, C4 ^# f1 P, z: S
end
  S/ l: {) G( p1 G, gj
* T: w0 S& Q1 z) k$ Pend
' i0 B3 H$ E7 l5 r( q问题是:- b: U/ S" N0 Z: b
if ((abs(absTestError(1))<=30 )&(abs(absTestError(2))<=30)&(abs(absTestError(3))<=30)|(error_sum<=eps))
# z5 B; e0 I# w9 ~" m+ y  b/ C, \中的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, 2025-9-8 01:42 , Processed in 0.888018 second(s), 62 queries .

回顶部