Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- function resumen = arnol_01( texto,matriz )
- %UNTITLED Summary of this function goes here
- % Detailed explanation goes here
- imagen=imread(texto);
- [fil,col,fon]=size(imagen);
- figure(1);imshow(imagen);
- aa=zeros(fil,col,fon);
- for i=1: fil
- for j=1: col
- for w=1: fon
- aux2=imagen(i,j,w);
- aux=mod(matriz*[i j]',fil);
- if(aux(1))==0
- aux(1)=fil;
- end
- if aux(2) == 0
- aux(2) =col;
- end
- aa(aux(1),aux(2),w)=aux2;
- end
- end
- end
- aa
- imwrite(aa,'mariposacuadrada01.bmp');
- figure(2);imshow('mariposacuadrada01.bmp');
- resumen=1;
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement