partie 1 :Compression :

Tri_cell

function mat_occ=tri_cell(mat_occ)

% Tri les cell arrays dans l'ordre croissant

a=mat_occ(2,:);

a=cell2mat(a);

ind_sort=issorted(a);

if ind_sort==0

    for i=1:length(a)-1

    if mat_occ{2,i}>mat_occ{2,i+1}   

    % échange occurences

    var=mat_occ{2,i}; 

    mat_occ{2,i}=mat_occ{2,i+1};

    mat_occ{2,i+1}=var;

    %éléments

    var2=mat_occ{1,i}; 

    mat_occ{1,i}=mat_occ{1,i+1};

    mat_occ{1,i+1}=var2;

    end % end if

    end % end for

end % end if