24小时热门版块排行榜    

查看: 1026  |  回复: 4

liguixiao

新虫 (初入文坛)

[求助] 求助 matlab 无味卡尔曼滤波程序哪里出错了

clear; clc;
%参数设置
a=0.5;
b=25;
c=8;
R=1;
Q=1;
N=50;
X(1)=0.1;
Y(1)=X(1)^3/200;
for i=1:N
X(i+1)=a*X(i)+b*(X(i)/(1+X(i)^2))+c*cos(1.2*i);
Y(i+1)=X(i+1)^3/200;
end
q=0.05;
P0=(X(1)*q)^2;
y=normrnd(Y,abs(Y)*q);
alpha=0.5;
belta=2;
kappa=0;
n=1;%为维数
W0=kappa/(n+kappa);%1代表维数为1
Wm(1)=W0/(alpha^2)+(1-1/(alpha^2));
Wc(1)=Wm(1)+(1+belta-alpha^2);
for l=2:3
    Wm(l)=(1-W0)/(2*alpha^2*n);
    Wc(l)=(1-W0)/(2*alpha^2*n);
end
Xukf=zeros(1,51);
Xukf(1)=X(1);
y1(1)=X(1)^3/200;
%UKF过程
for i=2:51
    xestimate= Xukf(i-1);
        P=P0;
    cho=(chol(alpha^2*(n+kappa)*P));
        xgamaP1=xestimate+cho;
        xgamaP2=xestimate-cho;
        Xsigma=[xestimate,xgamaP1,xgamaP2];
    for k=1:3
         Xsigmapre(k)=a*Xsigma(k)+b*(Xsigma(k)/(1+Xsigma(k)^2))+c*cos(1.2*(i-1));
    end
        xpred=0;
    for k=1:3
       xpred=xpred+Wm(k)*Xsigmapre(k);
    end
        ppred=0;  
    for k=1:3
       ppred=ppred+Wc(k)*(Xsigmapre(k)-xpred)*(Xsigmapre(k)-xpred);
    end
       ppred=ppred+Q;
      
       chor=(chol(alpha^2*(n+kappa)*ppred));
       XaugsigmaP1=xpred+chor;
       XaugsigmaP2=xpred-chor;
     Xaugsigma=[xpred XaugsigmaP1 XaugsigmaP2];
    for k=1:3  
       Ysigmapre(k)= Xaugsigma(k)^3/200;
    end
        ypred=0;        
    for k=1:3
       ypred=ypred+Wm(k)*Ysigmapre(k);
    end
   
    Pzz=0;
    for k=1:3
       Pzz=Pzz+Wc(k)*(Ysigmapre(k)-ypred)*(Ysigmapre(k)-ypred);
    end
    Pzz=Pzz+R;
   
        Pxy=0;
    for k=1:3
       Pxy=Pxy+Wc(k)*(Xaugsigma(k)-xpred)*(Ysigmapre(k)-ypred);
    end
   
    K=Pxy*inv(Pzz);                  
    P=ppred-K*Pzz*K';
    P0=P;
    xestimate=xpred+K*(Y(i)-ypred);  
    Xukf(i)=xestimate;
    y1(i)=xestimate^3/200;
end
    plot(0:N,y1,'b',0:N,Y,'r')
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

baobiao007

木虫 (职业作家)

。。。。。。。。
2楼2013-10-17 11:08:14
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

liguixiao

新虫 (初入文坛)

引用回帖:
2楼: Originally posted by baobiao007 at 2013-10-17 11:08:14
。。。。。。。。

这算什么,请阁下指教一下程序,阁下也是做无味卡尔曼滤波的吗
3楼2013-10-17 13:56:40
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

baobiao007

木虫 (职业作家)

中国特色

不懂这个东西。
我同意叔本华的观点,人们投身艺术和科学领域的强烈愿望之一就是逃离痛苦、残酷和枯燥无味的现实生活,逃离自己飘忽不定的七情六欲的桎梏。--爱因斯坦
4楼2013-10-17 15:34:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
5楼2015-12-09 15:31:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 liguixiao 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 070303一志愿西北大学学硕310找调剂 +4 d如愿上岸 2026-03-12 6/300 2026-03-16 14:48 by 可淡不可忘
[考研] 材料专硕306英一数二 +4 z1z2z3879 2026-03-16 4/200 2026-03-16 13:53 by laoshidan
[考研] 一志愿985,本科211,0817化学工程与技术319求调剂 +4 Liwangman 2026-03-15 4/200 2026-03-16 08:01 by wang_dand
[考研] 调剂 +8 调剂的考研学生 2026-03-09 8/400 2026-03-15 22:14 by Winj1e
[文学芳草园] 伙伴们,祝我生日快乐吧 +15 myrtle 2026-03-10 24/1200 2026-03-15 21:16 by 苏州_逗号
[考研] 297一志愿上交085600求调剂 +5 指尖八千里 2026-03-14 5/250 2026-03-14 17:26 by a不易
[基金申请] 现在如何回避去年的某一个专家,不知道名字 +3 zk200107 2026-03-12 6/300 2026-03-14 17:13 by zk200107
[考研] 学硕285求调剂 +13 Wisjxn 2026-03-12 46/2300 2026-03-14 10:33 by JourneyLucky
[考研] 085600求调剂 +3 a邵星池 2026-03-09 3/150 2026-03-14 01:32 by JourneyLucky
[考研] 295复试调剂 +5 简木ChuFront 2026-03-09 5/250 2026-03-14 01:29 by JourneyLucky
[考研] 云南财经大学信息学院计算机学硕专硕学位点 +3 zjptai 2026-03-10 5/250 2026-03-14 01:23 by 飞行琦
[考研] 一志愿郑大070303,338分,求调剂 +4 dadawaf 2026-03-10 5/250 2026-03-14 01:20 by lsw010101
[考研] 265求调剂 +9 小木虫085600 2026-03-09 12/600 2026-03-14 01:11 by JourneyLucky
[考研] 279求调剂 +3 抓着星星的女孩 2026-03-10 3/150 2026-03-13 23:47 by userper
[考研] 材料工程,326分,求调剂 +6 KRSLSR 2026-03-10 6/300 2026-03-13 23:47 by JourneyLucky
[考研] 0805,333求调剂 +3 112253525 2026-03-10 3/150 2026-03-13 23:42 by JourneyLucky
[考研] 341求调剂 +4 番茄头--- 2026-03-10 4/200 2026-03-13 23:12 by JourneyLucky
[考研] 293求调剂 +3 世界首富 2026-03-11 3/150 2026-03-13 16:27 by JourneyLucky
[考研] 277求调剂 +4 anchor17 2026-03-12 4/200 2026-03-13 11:15 by 白夜悠长
[考研] 333求调剂 +3 152697 2026-03-12 4/200 2026-03-13 07:08 by Iveryant
信息提示
请填处理意见