找回密码
 注册
关于网站域名变更的通知
查看: 503|回复: 1
打印 上一主题 下一主题

卡尔曼滤波基本方程

[复制链接]
  • TA的每日心情
    难过
    2019-11-19 16:03
  • 签到天数: 1 天

    [LV.1]初来乍到

    跳转到指定楼层
    1#
    发表于 2020-1-15 13:51 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

    EDA365欢迎您登录!

    您需要 登录 才可以下载或查看,没有帐号?注册

    x
    %Title卡尔曼滤波基本方程
    ( b+ Z3 Q" k5 o%A1初始化  C5 ~9 {  n5 c. |0 [

    & r) Q. t. `4 G- q3 f7 a( g) F%A1.1参数初始化
    8 Q+ p; }. I4 V( Z7 x5 ON=200;
    ( z' P5 T/ A- U8 Q- b6 M  U1 H% J" d7 `1 A$ f! {- x
    Xa=zeros(N,1);%预估值
    , I5 K6 P+ J6 v6 c. rX=zeros(N,1);%当前时刻最优估计值
    4 O5 x. g, K/ {  Q9 hPa=zeros(N,1);%Xa的方差矩阵
    # U5 M, p' U) d# _/ B7 ~& [P=zeros(N,1);%X的方差矩阵
    3 p8 g/ |, P# J/ C$ K& FKg=ones(N,1);%卡尔曼增益
    ( z# C/ @" ]( `8 f' l" ^) |$ K; N" i' B# C- @! _6 a8 U
    Z=zeros(N,1);%观测值- d& L7 B$ b# I# j

    5 C; f! e9 }) X. B' }* eW=randn(N,1);%过程噪声3 ^/ e7 z' ]- D- x! I, f
    stdW=std(W);%标准差
    8 H0 U7 F1 v0 P& ~* }5 T. mvarW=stdW.^2;%方差
    : l6 l! w/ L3 [! W5 K# VV=0.5*randn(N,1);%观测噪声) A+ [; j* @- h1 v' o3 C5 }
    stdV=std(V);%标准差) ~: r& f$ |* W/ p
    varV=stdV.^2;%方差( s+ @, m: f" ^' p/ V
    8 G; @" W9 J; P" W* L
    A=1;& \$ _+ w) k* Q6 D
    H=1;
    9 W* }$ k  \3 o- E2 f4 g
    9 w  W- n0 F, S& z8 {, z%A1.2状态初始化
    ) s4 x" L  d6 f9 YX(1)=23;%初始估计温度
    ' a+ K( K: x( M! E$ y/ u! _' v1 mP(1)=10;%初始估计方差, K/ E, Z4 D8 x( S! j
    Z(1)=25+V(1);- k' \( y7 Y' W0 _
    Xa(1)=23+W(1);
    + v$ s1 N& o$ _1 q  ]+ k/ {
    5 ~1 @9 D: p7 C  W. z9 w* o/ j4 M%卡尔曼滤波
    ; f( K  X8 `5 E4 A' n5 }% I+ tfor k=2:N) \% `/ k- @7 b2 m! ^
        %预估: ?# L+ h" C2 i# D6 w, K- k
        Xa(k)=A*X(k-1);/ M" j# m* I- i% `( u8 e( U
        Pa(k)=A*P(k-1)*A'+varW;4 w0 s5 s, k3 Y' a5 _
    # |; E) {. Z& r5 M+ x! v4 f% z
        %校正( G2 [9 i4 u0 T! V/ O, }. S
        Kg(k)=Pa(k)*H'/(H*Pa(k)*H'+varV);+ C$ S5 `2 C, q" `9 N
        Z(k)=25+V(k);%25是真实温度值
    , {+ R7 k1 L9 q  C2 z* Y7 O1 C    X(k)=Xa(k)+Kg(k)*(Z(k)-H*Xa(k));- t. |6 x- ?1 {, y% ]8 a, Z; }
        P(k)=(1-Kg(k)*H)*Pa(k);
    4 t" v5 b' Q5 }end
    * E) W" j) n+ N) J
    1 w5 d1 L9 n" D0 l$ y( _4 Qt=1:N;2 T( G( s: C5 \" C+ @/ @6 P
    realVal=25*ones(N,1);
    ( [8 B1 g& j8 c
    ( c# S# ~! n: t4 K' M" \# Cplot(t,realVal,'y',t,Z,'c',t,Xa,'b',t,X,'r');6 d0 N+ _1 s" {
    axis([0 N 20 30]);! ~; h4 g. m: w8 ~% m8 Q
    legend('真实值','观测值','预估值','估计值');
    5 P& K8 Q9 {- ~; l2 u+ W# x8 mgrid on;  o/ A5 S: F0 h! r% Q2 o

    / O9 t1 S7 `- V# K" c, {title('Kalman Filter');
    ) H* J! ?9 C. d+ S/ ]8 Y3 b- v8 Y/ d+ I) X+ [
    %realVal真实值;Z观测值;Xa预估值;X最优估计值;W过程噪声;V观测噪声
    ! N! e$ D/ ]  M1 S: o" v! B5 \1 e
    " o( }+ G& X2 F$ O4 [
    您需要登录后才可以回帖 登录 | 注册

    本版积分规则

    关闭

    推荐内容上一条 /1 下一条

    EDA365公众号

    关于我们|手机版|EDA365电子论坛网 ( 粤ICP备18020198号-1 )

    GMT+8, 2025-9-1 07:11 , Processed in 0.109375 second(s), 23 queries , Gzip On.

    深圳市墨知创新科技有限公司

    地址:深圳市南山区科技生态园2栋A座805 电话:19926409050

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