Im=imread('C:\Documents and Settings\Administrator\My Documents\My Pictures\f32','jpeg');
k=1;
for t=1:2:8
k=k*2;
I=ones(32*k,32*k);
I=im2uint8(I);
I(1:2:32*k,1:2:32*k)=Im(1:1:32*(k/2),1:1:32*(k/2));
for i=1:32*k
for j=1:32*k
if rem(i,2)==1
if rem(j,2)==0
if j-1~=0 && j+1~=(32*k)+1
I(i,j)=(I(i,j-1)/2)+(I(i,j+1)/2);
else
if j-1==0
I(i,j)=I(i,j+1);
end
if j+1==(32*k)+1
I(i,j)=I(i,j-1);
end
end
end
end
end
end
for i=1:32*k
for j=1:32*k
if rem(i,2)==0
if i-1~=0 && i+1~=(32*k)+1
I(i,j)=(I(i+1,j)/2)+(I(i-1,j)/2);
else
if i-1==0
I(i,j)=I(i+1,j);
end
if i+1==(32*k)+1
I(i,j)=I(i-1,j);
end
end
end
end
end
Im=I(1:1:32*k,1:1:32*k);
end
%imshow(I);
imwrite(I,'C:\Documents and Settings\Administrator\My Documents\My Pictures\imF32to512.jpeg');
