QQ登录

只需要一步,快速开始

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

[代码资源] 请问大神这个代码错在哪里,应该如何修改.以及回答一个简单的题目,谢谢。

[复制链接]
字体大小: 正常 放大
昌辉9        

3

主题

13

听众

72

积分

升级  70.53%

  • TA的每日心情
    开心
    2016-5-23 22:22
  • 签到天数: 54 天

    [LV.5]常住居民I

    自我介绍
    初学者

    群组Matlab讨论组

    跳转到指定楼层
    1#
    发表于 2014-9-3 16:19 |只看该作者 |倒序浏览
    |招呼Ta 关注Ta
    20体力
    day=[8.6187,8.3507,8.3142,8.2898,8.2791,8.2796,8.2784,8.2770,8.2770,8.2774,8.2780,8.1013,7.8087,7.3872,6.85,6.81,6.622,6.61,6.25,6.07];; p% b! L/ P4 G8 ]# U, V
    dayhistory=day(1:16);%取其中三十天作为历史数据样本
    9 n1 Q! K3 s) U" ~# vdayhismod=reshape(dayhistory,4,4);% 将历史数据分为6个样本,每个大小为5,其中reshape是以列排序的
    " M2 M& X  _$ t+ j9 R5 D* gdayday=day(1:12);% 取其中的前25天
    & W- ?% m: \% idaypost=day(5:16);%取其中的随后25天' ?8 y% @$ d+ V
    p=reshape(dayday,3,4);% 将前25天数据分为5行5列矩阵作为网络的训练输入样本
    + H! {& m# Y) x8 i; ~1 U8 P# At=reshape(daypost,3,4); %将随后的25天分为5行5列矩阵作为网络的目标输出向量+ {: K( h3 a  |  K/ B
    daylast=day(13:16);
    * P. u: y5 }2 ^+ m  N; S" T, ch3=reshape(daylast,4,1);% 将倒数第二个样本作为网络测试时的输入样本1 o/ ], D9 |. H# M3 M
    r=5:16;
      K. |* G* B0 i4 M- [- I8 Z. |rr=reshape(r,4,3);- l7 S$ \* h- j
    %%%%%%%%%%%%%% 新建网络bp %%%%%%%%%%%%%%%%2 {1 V: q8 a% s" ^1 U# @
    net=newff(minmax(p),[4,3],{\'purelin\' \'purelin\'},\'trainlm\');. _  P4 g" l4 }4 d% n
    y1=sim(net,p);
    $ \1 a( u2 O; _" C& @% 新建网络,其中minmax(p)为p的没一次输入的最大最小值向量7 B# z3 ~' B7 e/ l4 m
    % 两层的传递函数均为purelin6 }) ~3 ^$ W2 e. \# C
    % 训练函数为trainlm9 j) x1 [8 a0 {, H, S( O/ }9 S8 s' K
    % 所训练的网络大小为[5,5]! p- f% U: T; n5 Q, u: t& D
    % 仿真训练前的网络& |+ `  {( G% c; N7 k; z
    ' q. g8 E) g0 x
    %%%%%%%%%%%  进行网络训练  %%%%%%%%%%%%%%/ {6 i, R  f( @8 i/ h; R
    % network parameters:
    2 }  K2 q5 Z* M  G5 @% {( X%   epochs--epochs of the train% O  y, |6 u! r( E3 J
    %   goal--errors goal of the network
    + v; Y; q! S) ]0 v+ X$ w%   lr--learning rate) G& F! |0 X7 N9 |- m* g, D3 a( H  |
    %   shows--epochs between the displays
    : ]" ]" A9 ?" D) d! }) _%   time--Maximum time to train in seconds6 F; a# Y( H) m& V9 d" y
    net.trainParam.epochs=200000;  % 训练次数
    ' S$ D$ i+ v0 RnettrainParam.goal=0.0001;  % 误差期望值
    - V+ o) i: Z6 `7 ]% returns of the train:% G" x2 \! Y! G% Y
    %   net--New network' F2 B5 \0 M9 w% ]6 a
    %    tr--Training record (epoch and perf).% }* B2 [/ }8 c0 y( B
    %     Y--Network outputs.
    $ S* J! _% c# k/ \& F0 K%     E--Network errors.0 l  \% K/ P* W1 F
    [net,tr,Y,E]=train(net,p,t);
    , s$ a5 H7 Z# W- }  ?8 N* g%%%%%%%%%%%  网络测试 %%%%%%%%%%%%%%%%0 m2 \, a. A8 G' D
    % input the testing points here %8 `- Q! t3 s- K! z. n, t# E
    title(\'神经网络训练结果\');
    8 z1 |" Y% j' U. e9 H2 vxlabel(\'时间(天)\');
    , Y& `3 E6 f: Z4 p' ?/ \ylabel(\'仿真输出结果\');
    " ?  d1 e3 H6 F& V) Mlegend(\'仿真模拟值\',\'实际值\',\'神经网络预测值\');
    6 S& r; c% c: U! A%%%%%%%%%%%%%%%%%%  绘制误差曲面 %%%%%%%%%%%%%
    0 E/ A! z. n) q4 m& rx=1:4;+ F: S. r8 H2 i
    y=1:4;- I9 F3 q  I! K
    y21=sim(net,p);
      y$ l' U) K. Z! I7 dy2=reshape(y21,1,12);
    . w) q8 X% h. |( Y8 k0 vclf
    1 C5 t9 P9 e: `. D. xplot(r,y2,\'b-^\')6 H+ i* g4 E- P. ?: R/ y
    hold on9 X2 H1 f9 N) C' {' C6 j
    plot(1:20,day,\'r-*\')
    1 K) \8 d* ~8 c6 p%%%%%%%%%%%%% 预测 %%%%%%%%%%%%%%%
    8 F$ S- I* f9 `# j& X' Ty3=sim(net,h3);
    " O! R- q9 p6 o$ D9 Qplot(17:2:20,y3,\'-*\')
    $ p7 l* Q4 c% q) ]hold on
    / l2 d3 l9 L, w9 _/ _$ C2 k4 x  A5 Ytitle(\'神经网络训练结果\');
    : U0 y0 v+ ^  N6 k: F, }xlabel(\'时间(天)\');/ G0 m% s- X; D  M7 `$ O) N
    ylabel(\'仿真输出结果\');# V3 y4 T$ x$ G3 L
    legend(\'仿真模拟值\',\'实际值\',\'神经网络预测值\');
    2 }2 w+ j. p% a0 e6 U: h; @& k" Q3 A%%%%%%%%%%%%%%%%%%  绘制误差曲面 %%%%%%%%%%%%%
      k& s: y" v7 P- K& |( a9 qx=1:4;
    + M! m: b7 {8 p, w+ p( X( D5 }7 f4 yy=1:4;
    ! ?1 Q$ I4 E6 h4 g5 Eplot3(x(1:3),y(1:3),E(x(1:3),y(1:3)))
    0 q, q& F& W3 {6 i运用简单的神经网络,怎样处理已经有的数据,一般输出的怎样的结果,有什么用,谢谢

    4 O; p9 J& S: f. C

    zan
    转播转播0 分享淘帖0 分享分享0 收藏收藏0 支持支持0 反对反对0 微信微信
    您需要登录后才可以回帖 登录 | 注册地址

    qq
    收缩
    • 电话咨询

    • 04714969085
    fastpost

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

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

    蒙公网安备 15010502000194号

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

    GMT+8, 2025-8-17 09:09 , Processed in 0.284533 second(s), 49 queries .

    回顶部