Sunday, June 8, 2008

Assignment 8 Question 3

function [smallimage]=enlarge3(picture,f);
picture=double(picture);
Mp=floor(size(picture,1)*f);
Np=floor(size(picture,2)*f);
for i=0:(Mp-1);
for j=0:(Np-1);
a=(i/f);
b=(j/f);
r=floor(a);
s=floor(b);
if (r>0) & (r<256)>0) & (s<256); for k=1:3; smallimage(i,j,k)=[1-a+r,a-r]*[picture(r,s,k),picture(r,s+1,k); picture(r+1,s,k), picture(r+1,s+1,k)]*[1-b+s; b-s]; end; end; end; end; endfunction;

From assignment 7 spectrum.jpg (f=0.75) size(80 149 3)
(f=1.25) size(99 185 3)



(f=0.25) size(26 49 3)

(f=2) size (51 97 3)

(f=0.1) size(9 19 3)

(f=2) size(17 37 3)




From assignment 7 picture1.jpg
(f=0.75) size (112 119 3)

(f=1.25) size (139 147 3)

(f=0.25) size (36 39 3)

(f=2) size (71 77 3)

(f=0.1) size (14 15 3)

(f=2) size( 27 29 3)



From assignment 7 picture2.jpg
(f=0.75) size (116 119 3)



(f=1.25) size(144 147 3)


(f=0.25) size(38 39 3)

(f=2) size (75 77 3)




(f=0.1) size (14 15 3)


(f=2) size (27 29 3)

No comments: