partie 2 :DeCompression :

Décodage RLE

 

function  vec=decodage_rle(rl)

% Effectue le décodage RLE du vecteur d'entrée

 %Récupérer la matrice [élément;occurrence]

L=length(rl);i=1;j=1;

while i<=(L) && j<=(L/2)

M(1,j)=rl(1,i);

M(2,j)=rl(1,i+1);

i=i+2;j=j+1;

end % end while

 %Construire le vecteur à partir de la matrice

p=1;

for k=1:(L/2)

   x=1;

   while x<=M(2,k)

      vec(p)=M(1,k);

      p=p+1;x=x+1;  

   end % end while

end % end for