entropy_enco.m

MATLAB编写的huffman编解码程序

function [enco,dict,R] = entropy_enco(index,Nb,Np)

[m,n] = size(index);
% Count the probability & Generate the quantized vector
for j=1:n
    for i=1:m
        if  index(i,j)>0
            sig(index(i,j)) = j;
            if  i==m
                prob(j) = i/Nb;
            end
        else
            prob(j) = (i-1)/Nb;
            break;
        end
    end
end
% Generates the binary Huffman code dictionary
num = 1:n;
[dict,avglen] = huffmanDic(num,prob);
% Huffman coding
enco = huffmanEnco(sig,dict);
% Count compression rate
R = size(enco,2)/(8*Nb*Np);