Chinaunix首页 | 论坛 | 博客
  • 博客访问: 686625
  • 博文数量: 90
  • 博客积分: 1631
  • 博客等级: 上尉
  • 技术积分: 1413
  • 用 户 组: 普通用户
  • 注册时间: 2008-04-15 22:43
文章分类
文章存档

2017年(8)

2016年(9)

2015年(11)

2014年(10)

2013年(9)

2012年(9)

2010年(2)

2009年(10)

2008年(22)

我的朋友

分类:

2008-05-22 18:18:10

clear all%递推开始
v=randn(300,1);
na=2;nb=1;nc=0;nk=1;
a1=[1,-0.8,-1];b1=[1,1.5];
a(1)=a1(1)-1;a(2)=a1(2)-a1(1);a(3)=-a1(2);
b(1)=b1(1)-1;b(2)=-b1(1);
x0=[0.0001,0.0001,0.0001,0.0001,0.0001]';x=x0;
p0=10^6*eye(5);
m=0.95;
t=4:1:303;
u(t)=1:1:300;
for t=4:1:303;
    y(1)=0,y(2)=0;y(3)=0;
    y(t)=-a(1)*y(t-1)-a(2)*y(t-2)-a(3)*y(t-3)+u(t-1)+b(1)*u(t-2)+b(2)*u(t-3)+v(t-3);
    h=[-a(1)*y(t-1),-a(2)*y(t-2),-a(3)*y(t-3),b(1)*u(t-2),b(2)*u(t-3)]';
    k=p0*h*inv(m+h'*p0*h);
    p1=1/m*(ones(5)-k*h')*p0;
    p0=p1;
    x1=x0+k*(y(t)-y(t-1)-h'*x0);
    x0=x1;
    x=[x,x0];
end
 
 
%The effection is good.bingo!
阅读(717) | 评论(0) | 转发(0) |
0

上一篇:郁闷的问题

下一篇:突发奇想

给主人留下些什么吧!~~