声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 1018|回复: 0

[编程技巧] 求助,求高手帮我看下这个延拓程序

[复制链接]
发表于 2009-6-4 13:41 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?我要加入

x
程序如下:
clc
clear all;
load 'C:\Documents and Settings\hmy\桌面\贺懋吟20051212\Q.txt';
%截取其中200个点进行训练逼近
t=Q(1:200);
for k=1:195;
    m(k,1:6)=t([k k+1 k+2 k+3 k+4 k+5]);
end
tt=m(:,6);x=m(:,1:5);tt=tt';
p=x';
err_goal=1e-007;
sc=0.1;
net=newrb(p,tt,err_goal,sc,200,1);
%ce shi
ty=sim(net,p);
tE=tt-ty;
tSSE=sse(tE);
tMSE=mse(tE);
%预测(测试)曲线
figure(2);
plot(tt,'-+');
hold on;
plot(ty,'r:*');
legend('原始序列','预测值');
title('RBF网络模型输出预测曲线');
b(1)=t(196);b(2)=t(197);b(3)=t(198);b(4)=t(199);b(5)=t(200);
for j=1:30;
for i=1:30;
    y(i,:)=[b(j) b(j+1) b(j+2) b(j+3) b(j+4)];
    n(:,i)=y(i,:)';
    b(j+5)=sim(net,n(:,i));
end
end
disp(b)
figure(3);
plot(t(1:240),'-+');
hold on;
plot(196:230,b,'r:*');
hold off;
训练时效果很好,延拓结果却很糟糕,请高手指点一下
回复
分享到:

使用道具 举报

您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

QQ|小黑屋|Archiver|手机版|联系我们|声振论坛

GMT+8, 2024-11-14 18:05 , Processed in 0.069783 second(s), 18 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表