24小时热门版块排行榜    

查看: 1166  |  回复: 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 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 欢迎发来filecode的Mz6后的代码验证其规律 +38 医学老男孩 2026-08-13 89/4450 2026-08-18 08:27 by 医学老男孩
[基金申请] 时间戳变了,能看出什么问题? +4 基诺咪客 2026-08-17 5/250 2026-08-18 08:03 by 基诺咪客
[基金申请] 93BebMhtakh前后11位开头都是大写 +4 且听虎啸 2026-08-17 5/250 2026-08-18 00:49 by 蔡棒棒菂
[基金申请] 感觉是下周放榜了 +6 angus9576 2026-08-17 11/550 2026-08-17 23:57 by angus9576
[基金申请] filecode=后面第一个是大写字母 +8 wangze12014 2026-08-14 10/500 2026-08-17 17:05 by xter9665
[基金申请] 哪位老哥知道今年的国自然具体哪一天放榜? +12 Ldrop2023 2026-08-13 15/750 2026-08-17 15:02 by 小豌豆_发芽
[基金申请] 今天系统多次维护,明天很可能放榜! +8 zju2000 2026-08-16 9/450 2026-08-17 12:20 by lmz0216
[基金申请] 时间戳又变了8-15 +13 archvillain 2026-08-15 25/1250 2026-08-16 20:13 by zhaosm1982
[基金申请] 2027广东省杰青 +3 奶牛小黑 2026-08-15 6/300 2026-08-16 20:07 by 奶牛小黑
[基金申请] 快农历七夕节了,轻松一下,男人悄悄话,女施主请不要进来。 +3 Tide man 2026-08-14 3/150 2026-08-16 17:47 by jurkat.1640
[精细化工] 招聘 金属平磨液,抛光液研发工程师 +3 小天0311 2026-08-14 3/150 2026-08-16 07:31 by H9PLUS
[基金申请] 各位道友,我要去昆明玩几天,回来见。 +7 Tide man 2026-08-14 8/400 2026-08-15 01:11 by arzu_hma
[基金申请] 是这周出结果还是下周出结果? +4 yuleib84 2026-08-11 4/200 2026-08-14 23:05 by lfy8008
[硕博家园] 读博的好处 +4 lnee 2026-08-11 4/200 2026-08-14 10:20 by ahsoarli
[基金申请] 重要来源:本周末出结果 +10 瞬息宇宙 2026-08-12 10/500 2026-08-13 15:46 by likettle
[基金申请] 不应该看fileCode +7 且听虎啸 2026-08-12 9/450 2026-08-13 14:27 by flydreamws
[基金申请] Filecode 又变了,巨变 +3 WH3796 2026-08-12 4/200 2026-08-13 14:13 by 小木虫6752397
[基金申请] 结合人工智能,周易传统文化,filecode打分制来了,3分以上希望很大。 +3 Tide man 2026-08-12 4/200 2026-08-13 08:35 by ZJTJZ
[基金申请] 2019年青年基金涵评意见,大家看看几个A,几个B? +11 Tide man 2026-08-11 11/550 2026-08-13 07:35 by 撸猫猫
[基金申请] 什么时候出结果,有咨询渠道??? +3 Tide man 2026-08-11 3/150 2026-08-11 17:54 by kudofaye
信息提示
请填处理意见