基于matlab curvelet变换图像去噪

基于matlab curvelet变换图像去噪

一、简介

1 curvelet变换的提出


2 curvelet变换的研究进展及现状


3 第一代curvelet变换

4 实现过程

二、源代码

function x = ifdct_wrapping(C, is_real, M, N)

% Initialization

nbscales = length(C);

nbangles_coarse = length(C{2});

nbangles = [1, nbangles_coarse .* 2.^(ceil((nbscales-(nbscales:-1:2))/2))];

if length(C{end}) == 1, finest = 2; else finest = 1; end;

if finest == 2, nbangles(nbscales) = 1; end;

if nargin < 2, is_real = 0; end;

if nargin < 4,

    if finest == 1, error('Syntax: IFCT_wrapping(C,M,N) where the matrix to be recovered is M-by-N'); end;

    [N1,N2] = size(C{end}{1});

else

    N1 = M;

    N2 = N;

end;



M1 = N1/3;

M2 = N2/3;



if finest == 1;

    

    bigN1 = 2*floor(2*M1)+1;

    bigN2 = 2*floor(2*M2)+1;

    X = zeros(bigN1,bigN2);



    % Initialization: preparing the lowpass filter at finest scale

    window_length_1 = floor(2*M1) - floor(M1) - 1 - (mod(N1,3)==0);

    window_length_2 = floor(2*M2) - floor(M2) - 1 - (mod(N2,3)==0);

    coord_1 = 0:(1/window_length_1):1;

    coord_2 = 0:(1/window_length_2):1;

    [wl_1,wr_1] = fdct_wrapping_win