MATLAB实现哈夫曼树判定法判定唯一可译码

以下是一个用MATLAB实现哈夫曼树判定法判定唯一可译码的程序：

function result = unique_decodable_code(code)
% code: 一个包含各个字符编码的向量
% result: 1表示唯一可译，0表示不唯一可译

% 统计各个字符出现的次数
freq = histcounts(code, unique(code));

% 构建哈夫曼树
[~, ~, ~, lengths] = huffmandict(1:length(freq), freq);

% 判断是否存在两个编码是另一个编码的前缀
for i = 1:length(lengths)
    for j = 1:i-1
        if strncmp(char(lengths{i}), char(lengths{j}), length(lengths{j})) == 1
            result = 0;
            return
        end
    end
end

result = 1;
end

该程序首先统计每个字符出现的次数，然后用 huffmandict 函数构建哈夫曼树，并将每个字符的编码存储在 lengths 中。最后，程序遍历 lengths 中的每个编码，判断是否存在另一个编码是它的前缀，如果存在，则说明编码不唯一可译。否则，编码唯一可译。