%%% Project Title: Lucas Kanade Motion EstimationUsing Pyramids (Level 4) %%% Note: The project specification says usedensity of 10 inplotting %%% Usage:Lucas_Kanade('1.bmp','2.bmp',10) function Lucas_Kanade(file1,file2,density); %% ReadImages %% img1 = im2double(imread (file1)); %% Takealternating rows and columns%% [odd1, even1] =split (img1); img2 = im2double(imread (file2)); [odd2, even2] =split (img2); %% Run LucasKanade %% [Dx, Dy] = Estimate(odd1, odd2); %% Plot %% figure; [maxI,maxJ]=size(Dx); Dx=Dx(1:density:maxI,1:density:maxJ); Dy=Dy(1:density:maxI,1:density:maxJ); q