QQ登录

只需要一步,快速开始

 注册地址  找回密码
查看: 2666|回复: 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];" b- _- f+ ]! I  G  e# G3 C
    dayhistory=day(1:16);%取其中三十天作为历史数据样本! [& \4 j% E; H  A* h& W- p5 j2 U
    dayhismod=reshape(dayhistory,4,4);% 将历史数据分为6个样本,每个大小为5,其中reshape是以列排序的
    2 F1 P5 ]0 B# H4 d9 t) N- Cdayday=day(1:12);% 取其中的前25天
    + w; K$ F) d' W! u' {daypost=day(5:16);%取其中的随后25天; X. h# S7 ^  h8 m3 i5 H  b% r( S
    p=reshape(dayday,3,4);% 将前25天数据分为5行5列矩阵作为网络的训练输入样本# `! K( S/ |  [/ S8 X
    t=reshape(daypost,3,4); %将随后的25天分为5行5列矩阵作为网络的目标输出向量9 u4 o5 w% V% I- t" t
    daylast=day(13:16);0 C* m8 U$ r8 h8 Z+ y6 @9 w  ^, @
    h3=reshape(daylast,4,1);% 将倒数第二个样本作为网络测试时的输入样本' R5 u' |, b. \4 ^4 n. e! Q+ Z; U( Y
    r=5:16;2 q  S9 z/ A' p4 G" e
    rr=reshape(r,4,3);/ D! ~( q7 y- [! l) d1 Y; \
    %%%%%%%%%%%%%% 新建网络bp %%%%%%%%%%%%%%%%2 F' a3 R6 {3 K5 W# u
    net=newff(minmax(p),[4,3],{\'purelin\' \'purelin\'},\'trainlm\');1 k- Q2 h6 y& B. X1 e9 |% U
    y1=sim(net,p);9 W3 Z  S" s  o" N' x( z
    % 新建网络,其中minmax(p)为p的没一次输入的最大最小值向量4 S& q( I; R- W" ]# w
    % 两层的传递函数均为purelin
    6 w; V" A# c; }3 ~! S, y3 o9 G* e% 训练函数为trainlm
    8 |: Z' E! [' L7 {% 所训练的网络大小为[5,5]0 ?9 D) t4 Q) D0 K1 ~, O/ ?
    % 仿真训练前的网络9 o* {% d3 t# V
    ) k  k, n2 {. \) Y1 p' X
    %%%%%%%%%%%  进行网络训练  %%%%%%%%%%%%%%
    ( D+ F, Q3 v- j$ M  M% network parameters:
    8 u' I) M8 R9 K, S& S%   epochs--epochs of the train1 ^* {: q1 r- X( C, ^
    %   goal--errors goal of the network9 l( l3 b8 c$ S
    %   lr--learning rate
    9 }# d3 k* f; ^: G1 L0 q! X%   shows--epochs between the displays
    ; `& y) V. L+ X, n  f%   time--Maximum time to train in seconds8 ^" h% {: ]! L( f6 Q! c
    net.trainParam.epochs=200000;  % 训练次数9 C# w. ]/ E, ^4 `( E
    nettrainParam.goal=0.0001;  % 误差期望值
    # B5 D; N' [7 h1 X; h% returns of the train:
    % H- Y! C1 y- P( V1 t& N9 Y%   net--New network, a/ Y* n( f0 }9 n) q5 E: R& C
    %    tr--Training record (epoch and perf).
    4 d9 I- b& A( O6 U$ s5 |%     Y--Network outputs.5 Y9 }2 c! }1 j  m* t8 [$ Q0 Z4 h$ U! N
    %     E--Network errors.) L( w. ~3 |: ^% m' U: k
    [net,tr,Y,E]=train(net,p,t);
    / R1 s2 U' d  j9 R7 H& M%%%%%%%%%%%  网络测试 %%%%%%%%%%%%%%%%
    % p$ u' o0 M3 h) o3 K/ ?. H3 [% input the testing points here %. S9 T) C& x3 N# y: `1 o
    title(\'神经网络训练结果\');
    / n. n% W1 @1 X% q# k  Z* sxlabel(\'时间(天)\');& g# T. C5 H4 o# b7 x2 \
    ylabel(\'仿真输出结果\');- k4 n* _. ]: Q2 Z' t
    legend(\'仿真模拟值\',\'实际值\',\'神经网络预测值\');
    # ^5 a  Z* X3 D' @%%%%%%%%%%%%%%%%%%  绘制误差曲面 %%%%%%%%%%%%%' P2 Q0 c% R$ f8 Q- m( ^
    x=1:4;& `, `* Y: V" S( O
    y=1:4;
    & _6 F! m* u7 H0 P4 uy21=sim(net,p);
    7 e& f! }9 ?9 E% x9 k! Y/ X: Ry2=reshape(y21,1,12);7 w+ ^) @0 a4 w+ D+ _$ X) u: l0 u
    clf
    , L/ ~3 O! _: N& E' o4 Oplot(r,y2,\'b-^\')
    2 M8 y- `6 A2 P7 i9 {hold on! p0 w: z7 @% g5 y3 m
    plot(1:20,day,\'r-*\')
    + U5 h4 z; ~1 s: n, K0 g5 l%%%%%%%%%%%%% 预测 %%%%%%%%%%%%%%%" L% T7 {& A1 x: a3 k
    y3=sim(net,h3);8 @0 D9 j( Q- W8 e: m5 b
    plot(17:2:20,y3,\'-*\'), L" I, q* B7 ~$ z" Y4 T+ ^' o2 @8 ]$ j
    hold on
      r7 m4 O( S$ E; ~* Y, ?; Dtitle(\'神经网络训练结果\');
    ' P# [4 ?# v0 S3 y3 g4 zxlabel(\'时间(天)\');! p4 k( X+ F4 n# K9 f- y/ \
    ylabel(\'仿真输出结果\');) n. I; i) [6 B0 Z
    legend(\'仿真模拟值\',\'实际值\',\'神经网络预测值\');
    # V$ P: _+ c7 M; w5 T. ^+ b%%%%%%%%%%%%%%%%%%  绘制误差曲面 %%%%%%%%%%%%%" {% G  a6 I; o$ V9 u. g0 V
    x=1:4;
    7 b$ H6 O* j6 Q( `- A+ xy=1:4;( q* S$ c& [. _: ]3 I# R
    plot3(x(1:3),y(1:3),E(x(1:3),y(1:3)))
    8 ?! w4 U0 }8 E# O8 g: o* a运用简单的神经网络,怎样处理已经有的数据,一般输出的怎样的结果,有什么用,谢谢
    4 k6 w  g. c1 A" V

    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-31 09:31 , Processed in 0.329860 second(s), 49 queries .

    回顶部