版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
1、實(shí)用標(biāo)準(zhǔn)文檔卡爾曼濾波算法實(shí)現(xiàn)代碼C+攸現(xiàn)代碼如下:=kalman.h=/ kalman.h: interface for the kalman class./#if!defined(AFX_KALMAN_H_ED3D740F_01D2_4616_8B74_8BF57636F2C0_INCLUDED_)#define AFX_KALMAN_H_ED3D740F_01D2_4616_8B74_8BF57636F2C0_INCLUDED_#if _MSC_VER > 1000#pragma once#endif / _MSC_VER > 1000#include <math.h&
2、gt;#include "cv.h"class kalmanpublic :void init_kalman( int x, int xv, int y, int yv);CvKalman* cvkalman;CvMat* state;CvMat* process_noise;CvMat* measurement;const CvMat* prediction;CvPoint2D32f get_predict( float x, float y);kalman( int x=0, int xv=0, int y=0, int yv=0);/virtual kalman();
3、INCLUDED;#endif /!defined(AFX_KALMAN_H_ED3D740F_01D2_4616_8B74_8BF57636F2C0.kalman.cpp#include"kalman.h"#include<stdio.h>/*testerdeprintertoutes lesvaleurs desvecteurs*/*testerdechangerles matrices du noises*/* replace state by cvkalman->state_post ? */CvRandState rng;const double
4、 T = 0.1;kalman:kalman( int x, int xv, int y, int yv)cvkalman = cvCreateKalman( 4,4,0 );state = cvCreateMat( 4,1, CV_32FC1 );process_noise = cvCreateMat( 4,1, CV_32FC1 );measurement = cvCreateMat( 4,1, CV_32FC1 );int code = -1;/* create matrix data */const floatA口= 1,T,0,0,0,1,0,0,0,0,1,T,0,0,0,1;co
5、nst float H口 = 1,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0;constfloatP口= 0,pow(320,2),pow(320,2)/T,0,0,pow(320,2)/T,pow(320,2)/pow(T,2),0,0,0,pow(240,2),pow(240,2)/T,0,0,pow(240,2)/T,pow(240,2)/pow(T,2);const float Q口 = pow(T,3)/3,pow(T,2)/2,0,0,pow(T,2)/2,T, 0,0,0,0,pow(T,3)/3,pow(T,2)/2,0,0,pow(T,2)/2,T;const
6、 float R口 = 1,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0;cvRandInit( &rng, 0,1,-1, CV_RAND_UNI );cvZero( measurement );cvRandSetRange( &rng, 0,0.1,0 );rng.disttype = CV_RAND_NORMAL;cvRand( &rng, state );memcpy( cvkalman->transition_matrix->data.fl,A,sizeof (A);memcpy( cvkalman->measurement_m
7、atrix->data.fl,H, sizeof (H);memcpy( cvkalman->process_noise_cov->data.fl,Q, sizeof (Q);memcpy( cvkalman->error_cov_post->data.fl,P, sizeof (P);memcpy( cvkalman->measurement_noise_cov->data.fl,R, sizeof (R);/cvSetIdentity(cvkalman->process_noise_cov,cvRealScalar(1e-5);/cvSetI
8、dentity( cvkalman->error_cov_post, cvRealScalar(1);/cvSetIdentity( cvkalman->measurement_noise_cov, cvRealScalar(1e-1) );/* choose initial state */state->data.fl0=x;state->data.fl1=xv;state->data.fl2=y;state->data.fl3=yv;cvkalman->state_post->data.fl0=x;cvkalman->state_pos
9、t->data.fl1=xv;cvkalman->state_post->data.fl2=y;cvkalman->state_post->data.fl3=yv;0 );cvRandSetRange( &rng, 0, sqrt(cvkalman->process_noise_cov->data.fl0), cvRand( &rng, process_noise ); CvPoint2D32fkalman:get_predict( float x, float y) /* update state with current posit
10、ion */ state->data.fl0=x; state->data.fl2=y;/* predict point position */* x'k=A 敏 k+B 敏 kP'k=A 敏 k-1*AT + Q */cvRandSetRange( &rng, 0, sqrt(cvkalman->measurement_noise_cov->data.fl 0),0 );cvRand( &rng, measurement );/* xk=A?xk-1+B?uk+wk */cvkalmacvMatMulAdd( cvkalman->
11、transition_matrix,state, process_noise,measuren->state_post ); /* zk=H?xk+vk */ cvMatMulAdd( cvkalman->measurement_matrix, cvkalman->state_post, ment, measurement );cvKalmanCorrect( cvkalman, measurement );floatmeasured_value_x= measurement->data.fl0;floatmeasured_value_y= measurement-&g
12、t;data.fl2;const CvMat* prediction = cvKalmanPredict( cvkalman, 0 );floatpredict_value_x= prediction->data.fl0;floatpredict_value_y= prediction->data.fl2;return (cvPoint2D32f(predict_value_x,predict_value_y);void kalman:init_kalman( int x, int xv, int y, int yv)state->data.fl0=x;state->d
13、ata.fl1=xv;state->data.fl2=y;state->data.fl3=yv;cvkalman->state_post->data.fl0=x;cvkalman->state_post->data.fl1=xv;cvkalman->state_post->data.fl2=y;cvkalman->state_post->data.fl3=yv;c語言實(shí)現(xiàn)代碼如下#include "stdlib.h"麗 田 TI 田I1 T 田 瞋In-I LI_1 r 融I 雨 T 崩#include "
14、;rinv.c"intlman(n,m,k,f,q,r,h,y,x,p,g)intn,m,k;doublef,q口川h,y口刈,p,g口; int i,j,kk,ii,l,jj,js;double *e,*a,*b;e=malloc(m*m* sizeof (double );l=m;if (l<n) l=n;a=malloc(l*l*sizeof (double );b=malloc(l*l*sizeof (double );for (i=0;i<=n-1;i+)for (j=0;j<=n-1;j+) ii=i*l+j; aii=0.0;for (kk=0;kk&
15、lt;=n-1;kk+)aii=aii+pi*n+kk*fj*n+kk;for (i=0;i<=n-1;i+)for (j=0;j<=n-1;j+) ii=i*n+j; pii=qii;for (kk=0;kk<=n-1;kk+)pii=pii+fi*n+kk*akk*l+j;for (ii=2;ii<=k;ii+) for(i=0;i<=n-1;i+)for (j=0;j<=m-1;j+) jj=i*l+j; ajj=0.0;題 T L 述II 卜I 帕 1 T 卜 I 酶 I 丁 上 丁 郎1for (kk=0;kk<=n-1;kk+)ajj=aj
16、j+pi*n+kk*hj*n+kk;)for(i=0;i<=m-1;i+)for(j=0;j<=m-1;j+) jj=i*m+j; ejj=rjj;for(kk=0;kk<=n-1;kk+)ejj=ejj+hi*n+kk*akk*l+j;)js=rinv(e,m);if (js=0) free(e); free(a); free(b); return (js);for(i=0;i<=n-1;i+)for(j=0;j<=m-1;j+) jj=i*m+j; gjj=0.0;for (kk=0;kk<=m-1;kk+)gjj=gjj+ai*l+kk*ej*m+kk
17、;for (i=0;i<=n-1;i+) jj=(ii-1)*n+i;xjj=0.0;for (j=0;j<=n-1;j+)xjj=xjj+fi*n+j*x(ii-2)*n+j;for (i=0;i<=m-1;i+) jj=i*l; bjj=y(ii-1)*m+i;for (j=0;j<=n-1;j+)bjj=bjj-hi*n+j*x(ii-1)*n+j;for (i=0;i<=n-1;i+) jj=(ii-1)*n+i;for (j=0;j<=m-1;j+)xjj=xjj+gi*m+j*bj*l;)if (ii<k) for (i=0;i<=n-1;i+)for (j=0;j<=n-1;j+) jj=i*l+j;a皿=0.0;for (kk=0;kk<=m-1;kk+)ajj=ajj-gi*m+kk*hkk*n+j;if (i=j)ajj=1.0+ajj;)for(i=0;i<=n-1;i+)for(j=0;j<=n-1;j+) jj=i*l+j;bjj=0.0;for(kk=0;kk<=n-1;kk+)bjj
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 小手拉大手交通安全一起守
- 2024商業(yè)廣場(chǎng)盛大開業(yè)啟幕系列(雪域之光王府井啟航主題)活動(dòng)策劃方案-113正式版
- 經(jīng)內(nèi)鏡逆行胰膽管造影(ERCP)護(hù)理業(yè)務(wù)學(xué)習(xí)
- Unit 4 Plants around us C (說課稿)-2024-2025學(xué)年人教PEP版(2024)英語三年級(jí)上冊(cè)
- 光學(xué)樹脂系列產(chǎn)品項(xiàng)目可行性研究報(bào)告寫作模板-拿地備案
- 信息技術(shù)七年級(jí)上冊(cè)第八課 動(dòng)感溫馨感恩卡-圖文結(jié)合說課稿(小小導(dǎo)游本領(lǐng)大)
- 福建省龍巖市新羅區(qū)2024-2025學(xué)年二年級(jí)上學(xué)期期末數(shù)學(xué)試題參考答案
- 江蘇省宿遷市(2024年-2025年小學(xué)六年級(jí)語文)部編版階段練習(xí)(下學(xué)期)試卷及答案
- 貴州師范大學(xué)《急救臨床技能訓(xùn)練》2023-2024學(xué)年第一學(xué)期期末試卷
- 貴州黔南科技學(xué)院《幼兒教師發(fā)展專題》2023-2024學(xué)年第一學(xué)期期末試卷
- 小班《火車開了》音樂欣賞課評(píng)課稿
- 倫理學(xué)與醫(yī)學(xué)倫理學(xué) (醫(yī)學(xué)倫理學(xué)課件)
- GB/T 6344-2008軟質(zhì)泡沫聚合材料拉伸強(qiáng)度和斷裂伸長(zhǎng)率的測(cè)定
- GA/T 1740.1-2020旅游景區(qū)安全防范要求第1部分:山岳型
- 產(chǎn)后康復(fù)客戶健康評(píng)估表格
- 企業(yè)人員組織結(jié)構(gòu)圖
- 個(gè)人現(xiàn)實(shí)表現(xiàn)材料1500字德能勤績(jī)廉(通用6篇)
- 六年級(jí)上冊(cè)數(shù)學(xué)單元測(cè)試-5.圓 青島版 (含答案)
- (精心整理)高一語文期末模擬試題
- QC成果解決鋁合金模板混凝土氣泡、爛根難題
- 管線管廊布置設(shè)計(jì)規(guī)范
評(píng)論
0/150
提交評(píng)論