partie 1 :Compression :
Ecriture en Huffman 1 pour une image en grasycale
function [nb_bits]=ecriture_fichier_huffman_gris(image_brute,qualite,option)
%Création du fichier compressé pour HUFFMAN
save fichiers_mat/option
[code,Y_dico]=compression_jpeg (image_brute,qualite,option);
tab_code=cell_to_tab (code,'_');
dico_ligne1=Y_dico(1,:);
dico_ligne2=Y_dico(2,:);
tab_dico1=cell_to_tab(dico_ligne1,'(');
tab_dico2=cell_to_tab(dico_ligne2,')');
tab=[tab_code,tab_dico1,tab_dico2,'"'];
fichier_compresse=['data_' option 'g' '.hzs'];
dlmwrite(fichier_compresse,tab,'delimiter','')
% calcul nombre de bits du fichier stocké
nb_bits=calcul_nb_bits (tab);