lucaspersogaussienne.m

Lukas Kanade Multi resolution program in matlab language.

%% Algorithme de Lucas & Kanade
clear all; close all; clc;

depx=[1 2 3 4 5]; % diff閞entes valeurs de d閜lacements
for i=1:5;
%  i=1;
dx02=depx(i);    
dy02=depx(i);

%% cr閍tion des images
N=64;
sig=10*dx02;
dx01=0;dy01=0;
im1=Gaussienne(sig,dx01,dy01,N);
im2=Gaussienne(sig,dx02,dy02,N);

% affichage
figure;
subplot(1,2,1); imagesc(im1);axis equal; colormap(gray);title('Gaussienne 2D');
subplot(1,2,2); imagesc(im2);axis equal; colormap(gray);title ('Gaussienne 2D d閏al閑');

%% essai 1D
% extraction d'une ligne de la m阭e coordonn閑 sur chaque image
e1=im1(N/2,:);e2=im2(N/2,:);
figure;plot(e1,'b');hold on;plot(e2,'m');title('Profil de la ligne de m阭e coordonn閑 sur chaque image');
ge1t=conv(e1,(1/12)*[-1 8 0 -8 1]); % application un filtre