load imdemos flower ;
w0 = double (flower) / 255 ;
w1 =w0 ;
figure ,imshow(w1 ,[ ]) ;
for k = 1 :96
for x = 1 :128
¡¡¡¡for y = 1 :128
¡¡¡¡¡¡¡¡x1 = x + y ;
¡¡¡¡¡¡¡¡y1 = x + 2*y ;
¡¡¡¡¡¡¡¡if x1 > 128
¡¡¡¡¡¡¡¡¡¡¡¡x1 = mod(x1 ,128) ;
¡¡¡¡¡¡¡¡end ;
¡¡¡¡¡¡¡¡if y1 > 128
¡¡¡¡¡¡¡¡¡¡¡¡y1 = mod(y1 ,128) ;
¡¡¡¡¡¡¡¡end ;
¡¡¡¡¡¡¡¡if x1 = 0
¡¡¡¡¡¡¡¡¡¡¡¡x1 = 128 ;
¡¡¡¡¡¡¡¡end ;
¡¡¡¡¡¡¡¡if y1 = 0
¡¡Y1 = 128 ;
¡¡¡¡¡¡¡¡end ;
¡¡¡¡¡¡¡¡w1 (x1 ,y1) =w0 (x ,y) ;
¡¡¡¡end ;
end ;
w0 =w1 ;
end ;
figure ,imshow(w1 ,[ ]) ;