Home > PR > zigzag.m

zigzag

PURPOSE ^

'ZIGZAG' genera un vector columna con ordenacion zigzag

SYNOPSIS ^

function aa=zigzag(a)

DESCRIPTION ^

'ZIGZAG' genera un vector columna con ordenacion zigzag
en plan JPEG (Ver Data Compression Book)

OJO! Solo para matrices cuadradas

USO: lin=zigzag(a);

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 function aa=zigzag(a)
0002 
0003 %'ZIGZAG' genera un vector columna con ordenacion zigzag
0004 %en plan JPEG (Ver Data Compression Book)
0005 %
0006 %OJO! Solo para matrices cuadradas
0007 %
0008 %USO: lin=zigzag(a);
0009 
0010 N=size(a);
0011 N=N(1);
0012 
0013 b=fliplr(a);
0014 aa=diag(b,N-1);
0015 
0016 for i=N-2:-1:1-N,
0017 
0018     anyad=diag(b,i);
0019     if (i/2-floor(i/2))>0
0020        anyad=anyad(length(anyad):-1:1);
0021     end
0022     aa=[aa;anyad];
0023 
0024 end
0025

Generated on Wed 29-Nov-2006 16:19:19 by m2html © 2003