contourlet、小波去噪

MATLAB里面分别用了小波去噪，contourlet去噪，以及二者与循环平移结合的去噪,直接运行quzao.m就可以，操作方便，运行效果也好

function y = backsamp（y）
% BACKSAMP    Backsampling the subband images of the directional filter bank
%
%   y = backsamp（y）
%
% Input and output are cell vector of dyadic length
%
% This function is called at the end of the DFBDEC to obtain subband images 
% with overall sampling as diagonal matrices
%
% See also: DFBDEC

% Number of decomposition tree levels
n = log2（length（y））;

if （n ~= round（n）） | （n < 1）
    error（‘Input must be a cell vector of dyadic length‘）;
end

if n == 1
    % One level the decomposition filterbank shoud be Q1r
    % Undo the last resampling （Q1r = R2 * D1 * R3）
    for k = 1:2
	y{k} = resamp（y{k} 4）;
	y{k}（: 1:2:end） = resamp（y{k}（: 1:2:end） 1）;
	y{k}（: 2:2:end） = resamp（y{k}（: 2:2:end） 1）;	
    end    
    
elseif n > 2    
    N = 2^（n-1）;
    
    for k = 1:2^（n-2）
	shift = 2*k - （2^（n-2） + 1）;
	
	% The first half channels
	y{2*k-1} = resamp（y{2*k-1} 3 shift）;
	y{2*k} = resamp（y{2*k} 3 shift）;
	
	% The second half channels
	y{2*k-1+N} = resamp（y{2*k-1+N} 1 shift）;
	y{2*k+N} = resamp（y{2*k+N} 1 shift）;	
    end
end

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

     文件     263222  2002-08-03 21:31  contourlet\lena.bmp

     文件     177851  2003-11-10 11:45  contourlet\barbara.png

     文件     160674  2003-11-11 10:27  contourlet\peppers.png

     文件      52332  2003-11-06 22:15  contourlet\zoneplate.png

     文件       7168  2003-04-10 10:30  contourlet\resampc.dll

     文件       1119  2003-09-10 23:32  contourlet\backsamp.m

     文件       5127  2003-11-05 00:10  contourlet\computescale.m

     文件       3537  2003-11-11 10:45  contourlet\Contents.m

     文件       3437  2003-11-10 12:22  contourlet\decdemo.m

     文件       2472  2003-11-13 00:17  contourlet\denoisedemo.m

     文件       2223  2003-11-05 22:44  contourlet\dfbdec.m

     文件       1768  2003-11-05 23:54  contourlet\dfbdec_l.m

     文件       1748  2003-11-05 08:11  contourlet\dfbimage.m

     文件       2012  2003-11-10 00:52  contourlet\dfbrec.m

     文件       1736  2003-11-06 00:18  contourlet\dfbrec_l.m

     文件       2729  2003-11-06 10:39  contourlet\dfilters.m

     文件        755  2003-04-10 10:30  contourlet\dup.m

     文件       1103  2003-04-10 10:30  contourlet\efilter2.m

     文件       1861  2003-11-05 22:25  contourlet\extend2.m

     文件       2098  2003-04-10 10:30  contourlet\fbdec.m

     文件       1507  2003-11-06 10:41  contourlet\fbdec_l.m

     文件       2360  2003-04-10 10:30  contourlet\fbrec.m

     文件       1426  2003-11-06 00:23  contourlet\fbrec_l.m

     文件        485  2003-04-10 10:30  contourlet\ffilters.m

     文件        856  2003-04-10 10:30  contourlet\ld2quin.m

     文件        662  2003-11-05 08:17  contourlet\ldfilter.m

     文件        722  2003-09-13 02:30  contourlet\lpdec.m

     文件        935  2003-09-13 02:48  contourlet\lprec.m

     文件        882  2003-11-05 08:19  contourlet\mctrans.m

     文件        775  2003-04-10 10:30  contourlet\modulate2.m

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