QQ登录

只需要一步,快速开始

 注册地址  找回密码
查看: 3028|回复: 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];
    # m" I4 b1 U. _& s7 n8 Z  \dayhistory=day(1:16);%取其中三十天作为历史数据样本* g# b1 S- ~; k1 `4 m
    dayhismod=reshape(dayhistory,4,4);% 将历史数据分为6个样本,每个大小为5,其中reshape是以列排序的# c8 P% ]- a. ^
    dayday=day(1:12);% 取其中的前25天: O) }  `( v% d' G$ J) V$ Q
    daypost=day(5:16);%取其中的随后25天# k: ?2 e6 W' N# ~5 _- v
    p=reshape(dayday,3,4);% 将前25天数据分为5行5列矩阵作为网络的训练输入样本
    + D, F& W. ~6 V0 q9 k  lt=reshape(daypost,3,4); %将随后的25天分为5行5列矩阵作为网络的目标输出向量7 D; ~, z% \7 c4 d
    daylast=day(13:16);
    " J' ^$ B6 C# v- e; O0 X, A! ]; Hh3=reshape(daylast,4,1);% 将倒数第二个样本作为网络测试时的输入样本' r/ l8 u6 H1 a8 W
    r=5:16;
    . S. x+ [  V1 v- Vrr=reshape(r,4,3);
    * t( L7 j; I: x( ]# v9 ~3 B%%%%%%%%%%%%%% 新建网络bp %%%%%%%%%%%%%%%%
    $ x, V' G1 T8 unet=newff(minmax(p),[4,3],{\'purelin\' \'purelin\'},\'trainlm\');; K) K. J/ @" b# U* @8 q& K1 n
    y1=sim(net,p);
    0 W! u4 r. G$ P' U( j0 v8 G: U( [; D% 新建网络,其中minmax(p)为p的没一次输入的最大最小值向量/ p/ f* }- E) |" W1 d2 f# R$ }
    % 两层的传递函数均为purelin! ?, T1 v. j% h7 d4 B8 w
    % 训练函数为trainlm( ~, U3 o4 s# x" D2 x0 ]3 G
    % 所训练的网络大小为[5,5]9 E; e" A& c* v6 {$ ?! w9 n) Y
    % 仿真训练前的网络# E1 W$ j$ v8 m, Y) x

    / B6 z( k6 @3 K( Q$ N, q' Z%%%%%%%%%%%  进行网络训练  %%%%%%%%%%%%%%/ p/ F! L2 D# e! d. H( L
    % network parameters:& @, d. q5 F2 n
    %   epochs--epochs of the train
    : P6 q' T# p) ?% d3 d) ]- X  J%   goal--errors goal of the network6 ?3 A5 O, d2 f' q$ Z  S+ |
    %   lr--learning rate, N: [: s8 I# X5 }# g- t
    %   shows--epochs between the displays
    / O  C  W( C4 o" L%   time--Maximum time to train in seconds' p% _! Q* s: U6 y
    net.trainParam.epochs=200000;  % 训练次数
    ' E# @* k  ]3 NnettrainParam.goal=0.0001;  % 误差期望值/ q1 I0 R" l, U  b  O9 f
    % returns of the train:, |! }. {8 A+ [- G9 Q
    %   net--New network+ j7 F4 V' k6 Z4 j
    %    tr--Training record (epoch and perf).
    + h: }, M5 E' z# P' w- w%     Y--Network outputs." S( }7 W- _& E) `) N. f9 Z
    %     E--Network errors.
    8 @( H0 D7 r3 u0 U[net,tr,Y,E]=train(net,p,t); 0 G- l% x9 m" `- Q
    %%%%%%%%%%%  网络测试 %%%%%%%%%%%%%%%%0 S. I, f$ `+ j+ S% l  G
    % input the testing points here %, W9 [. b; D/ G1 O$ u
    title(\'神经网络训练结果\');" e4 {& s& u  [# ?
    xlabel(\'时间(天)\');
    7 f% U9 ]  W% O: }  \ylabel(\'仿真输出结果\');
    6 S" M2 U( U1 F$ Z# _# ^" b5 w8 H8 klegend(\'仿真模拟值\',\'实际值\',\'神经网络预测值\');
    # m/ X$ n) n7 @; P%%%%%%%%%%%%%%%%%%  绘制误差曲面 %%%%%%%%%%%%%$ Z& D( {& z: ~! |2 L
    x=1:4;
    7 V1 E3 D+ }3 \y=1:4;
    / b7 l6 D( @- V; P& xy21=sim(net,p);9 y. r3 Z" b) W5 N& X
    y2=reshape(y21,1,12);8 I2 ?  E! F' M. @
    clf: s0 h" h# a% P3 F( P; A8 b# j
    plot(r,y2,\'b-^\')# {& k* r  F. |: Y- S( @4 V
    hold on- S+ a; @# J2 i% q9 h
    plot(1:20,day,\'r-*\')
    1 h/ t$ m$ u- u  _%%%%%%%%%%%%% 预测 %%%%%%%%%%%%%%%% C/ R  |4 b1 O7 n
    y3=sim(net,h3);
    ! X5 v: E  G* p' Cplot(17:2:20,y3,\'-*\')$ c8 P6 R" W: E6 d* ~
    hold on
    4 a5 _* A! b. R' P& {title(\'神经网络训练结果\');
    % ~5 C5 j* m% q/ ?xlabel(\'时间(天)\');+ i# A8 P6 l( E
    ylabel(\'仿真输出结果\');4 h( Q8 ]  v1 w$ w( t- b$ s: {1 ]2 H
    legend(\'仿真模拟值\',\'实际值\',\'神经网络预测值\');4 ?1 q8 }* }4 h1 h
    %%%%%%%%%%%%%%%%%%  绘制误差曲面 %%%%%%%%%%%%%5 M1 }- U2 @" A# x( O2 D+ M
    x=1:4;
    ; M: U! B5 U, A1 Zy=1:4;
    * k9 X- U8 `3 R3 g0 ?# c  ^plot3(x(1:3),y(1:3),E(x(1:3),y(1:3)))) L" u3 G6 N5 y
    运用简单的神经网络,怎样处理已经有的数据,一般输出的怎样的结果,有什么用,谢谢

    . I/ b! n9 e9 t

    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, 2026-6-14 20:42 , Processed in 0.615515 second(s), 49 queries .

    回顶部