%arnold_change變換置亂函數
%function?w0=arnold_change（originalmn）
%clear?all
w0=imread（‘Penguins.JPG‘）;
%w0=original;
w1=w0;
subplot（121）
imshow（w0）title（‘原圖像‘）;
for?k=1:n;
????for?x=1:256;
?????????for?y=1:256;
?????????????x1=x+y;
?????????????y1=x+2*y;
????????????if?x1>256
????????????????x1=mod（x1256）;
????????????end