• 大小: 17.76MB
    文件类型: .rar
    金币: 2
    下载: 1 次
    发布日期: 2023-07-14
  • 语言: Matlab
  • 标签: Matlab  

资源简介

本资源是Matlab中小波分析工具箱,包含了Modwt(极大重叠离散小波变换等),来自2016版本的matlab,函数较为丰富

资源截图

代码片段和文件信息

function  [HC_CellHC_StrAll_CellMean_Len] = built_huffcode(COUNT)
%BUILT_HUFFCODE Huffman coding.
%    [HC_CELLHC_STRALL_CELLMEAN_LEN] = BUILT_HUFFCODE(COUNT)
%
%    COUNT is an array such that COUNT(I) gives the count for 
%    the Ith symbol to be coded.
%
%    HC_CELL is a cell array such that HC_CELL{I} is a
%    binary string which represants the code of the Ith symbol
%    to be coded.
%
%    HC_STR is a string which contains all the Huffman codes.
%    The binary strings are separated by the symbol ‘2‘.
%
%    ALL_CELL is a cell array such that:
%      ALL_CELL{K1} contains a symbol number.
%      ALL_CELL{K2} contains the corresponding binary string code.
%      ALL_CELL{K3} contains the corresponding count.
%
%    MEAN_LEN gives the mean value of length of the binary
%    strings code. 
%
%    Examples:
%      COUNT = round(100*rand(115))
%      [HC_CellHC_StrAll_CellMean_Len] = built_huffcode(COUNT)
%
%      COUNT = round(abs(25*randn(130)))
%      [HC_CellHC_StrAll_CellMean_Len] = built_huffcode(COUNT)

%   M. Misiti Y. Misiti G. Oppenheim J.M. Poggi 23-Jul-2001.
%   Last Revision: 05-Apr-2008.
%   Copyright 1995-2008 The MathWorks Inc.

nb_SYMB = length(COUNT);
B = [ (1:nb_SYMB)‘ COUNT(:)];
B(COUNT==0:) = [];
NB_True_CODE = size(B1);
All_Cell = num2cell(B);
while size(All_Cell1)>1
    [dumidx] = sort(cat(1All_Cell{:2})); %#ok
    All_Cell = All_Cell(idx:);
    All_Cell{21} = {All_Cell{11}  All_Cell{21}};
    All_Cell{22} = All_Cell{12} + All_Cell{22};
    All_Cell(1:) = [];
end
All_Cell{12} = ‘‘;
IH = 1;
while IH    if iscell(All_Cell{IH1})
        C = All_Cell{IH2};
        All_Cell(end+1:) = {All_Cell{IH1}{1}  [C‘1‘]}; %#ok
        All_Cell(end+1:) = {All_Cell{IH1}{2}  [C‘0‘]}; %#ok
        All_Cell(IH:) = [];
    else
        IH = IH+1;
    end
end
[dumidx] = sortrows(cat(1All_Cell{:1})1); %#ok
All_Cell_SORTED_C1 = All_Cell(idx:);
%---------------------------------------------
% Code sorted by length
% All_Cell_SORTED_C2 = sortrows(All_Cell2);
%---------------------------------------------
I = cat(1All_Cell_SORTED_C1{:1});
HC_Cell = cell(nb_SYMB1);
HC_Cell(I) = All_Cell_SORTED_C1(:2);
HC_Str = HC_Cell;
for k = 1:length(HC_Str)  HC_Str{k} = [HC_Str{k}  ‘2‘]; end
HC_Str = cat(2HC_Str{:});

if nargout>2
    idx = cat(2All_Cell{:1});
    B =  num2cell(COUNT(idx))‘;
    All_Cell(:3) = B;
    if nargout>3
        N = 0;
        S = 0;
        for k = 1:size(All_Cell1)
            N = N + All_Cell{k3};
            S = S + length(All_Cell{k2})*All_Cell{k3};
        end
        Mean_Len = S/N;
    end
end

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       2668  2013-05-23 17:02  wavelet\compression\built_huffcode.m

     文件       7108  2013-05-23 17:02  wavelet\compression\bwc_algo.m

     文件        430  2013-05-23 17:03  wavelet\compression\def_tmpfile.m

     文件        540  2008-05-09 17:05  wavelet\compression\exp_compRat_aswdr_BW.mat

     文件        569  2008-05-09 17:05  wavelet\compression\exp_compRat_aswdr_COL.mat

     文件        524  2008-05-09 17:05  wavelet\compression\exp_compRat_ezw_BW.mat

     文件        568  2008-05-09 17:05  wavelet\compression\exp_compRat_ezw_COL.mat

     文件       6371  2008-05-09 17:05  wavelet\compression\exp_compRat_gbl_f.mat

     文件       8355  2008-05-09 17:05  wavelet\compression\exp_compRat_gbl_h.mat

     文件       6501  2008-05-09 17:05  wavelet\compression\exp_compRat_lvl.mat

     文件      31421  2008-05-09 17:05  wavelet\compression\exp_compRat_lvl_BIS.mat

     文件        523  2008-05-09 17:05  wavelet\compression\exp_compRat_spiht_3d_BW.mat

     文件        548  2008-05-09 17:05  wavelet\compression\exp_compRat_spiht_3d_COL.mat

     文件        520  2008-05-09 17:05  wavelet\compression\exp_compRat_spiht_BW.mat

     文件        567  2008-05-09 17:05  wavelet\compression\exp_compRat_spiht_COL.mat

     文件        534  2008-05-09 17:05  wavelet\compression\exp_compRat_stw_BW.mat

     文件        572  2008-05-09 17:05  wavelet\compression\exp_compRat_stw_COL.mat

     文件        534  2008-05-09 17:05  wavelet\compression\exp_compRat_wdr_BW.mat

     文件        583  2008-05-09 17:05  wavelet\compression\exp_compRat_wdr_COL.mat

     文件       4792  2013-05-23 17:03  wavelet\compression\getcompresspar.m

     文件        594  2013-05-23 17:03  wavelet\compression\getsizes.m

     文件       3263  2013-05-23 17:03  wavelet\compression\modify_wtcfile.m

     文件        598  2013-10-04 09:26  wavelet\compression\psnr_mse_maxerr.m

     文件       2782  2013-05-23 17:03  wavelet\compression\significant_map.m

     文件       1702  2013-05-23 17:03  wavelet\compression\test_step_by_step.m

     文件      51850  2013-08-21 17:01  wavelet\compression\wc2dtool.fig

     文件      89762  2013-06-30 11:13  wavelet\compression\wc2dtool.m

     文件        916  2013-05-23 17:03  wavelet\compression\wcfs2mat.m

     文件      19556  2013-05-23 17:03  wavelet\compression\wcompress.m

     文件       1963  2013-05-23 17:03  wavelet\compression\wconvimg.m

............此处省略1147个文件信息

评论

共有 条评论