curvelet

利用curvelet_toolbox开发的一个红外和可见光图像融合代码。

clc
clear all
close all

% fdct_wrapping_demo_recon.m -- Partial curvelet reconstruction.
X=imread（‘imgwarp.bmp‘）;
X2=imread（‘IR1022_3.bmp‘）;
X1=rgb2gray（X）;

% Forward curvelet transform
disp（‘Take curvelet transform: fdct_wrapping‘）;
tic; C1 = fdct_wrapping（double（X1）02）; toc;
tic; C2 = fdct_wrapping（double（X2）02）; toc;
C=C1;
%tic; C = fdct_wrapping（double（X）02516）; toc;
for s=1:2
  for w=1:length（C{s}）
    C{s}{w} = 0.5*C1{s}{w} + 0.5*C2{s}{w};
  end
end

for s=3:length（C）
  for w=1:length（C{s}）
    C{s}{w} = max（C1{s}{w} C2{s}{w}）;
  end
end
disp（‘Take inverse curvelet transform: ifdct_wrapping‘）;
tic; Y = ifdct_wrapping（C0256320）; toc;

Y = uint8（Y）;
% subplot（131）; colormap gray; imagesc（real（X1））; axis（‘image‘）; title（‘VI‘）;
% subplot（13

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

     文件     197978  2011-11-10 17:42  curvelet变换\1.fig

     文件     197871  2011-11-10 17:49  curvelet变换\111.fig

     文件     330472  2013-02-18 18:29  curvelet变换\3.emf

     文件     198102  2011-11-10 17:43  curvelet变换\3.fig

     文件       1048  2011-12-30 15:19  curvelet变换\curveletfusion.asv

     文件       1045  2013-02-27 09:48  curvelet变换\curveletfusion.m

     文件      15443  2008-04-04 00:43  curvelet变换\fdct_wrapping.m

     文件        751  2008-04-04 00:43  curvelet变换\fdct_wrapping_window.m

     文件      72356  2011-11-10 17:22  curvelet变换\fusion7.fig

     文件      16277  2008-04-04 00:43  curvelet变换\ifdct_wrapping.m

     文件     245814  2011-11-01 15:00  curvelet变换\imgwarp.bmp

     文件      82998  2011-10-21 13:21  curvelet变换\IR1022_3.bmp

     文件       2389  2011-11-10 17:37  curvelet变换\LCT-curvelet.asv

     文件       2276  2011-11-10 17:37  curvelet变换\LCT-curvelet.m

     文件       2211  2013-02-18 18:50  curvelet变换\LCTcurvelet.m

     文件       2211  2013-02-18 18:52  curvelet变换\LCTcurvelet1.m

     文件      32087  2008-04-04 00:43  curvelet变换\Lena.jpg

     文件      82998  2011-12-30 15:26  curvelet变换\qubo1.bmp

     文件      32087  2008-04-04 00:43  curvelet变换\VI1021_4.bmp.jpg

     文件     113223  2013-02-18 18:48  curvelet变换\VI1021_4.png

     文件      82998  2011-12-30 15:26  curvelet变换\xiaobo1.bmp

     文件         60  2013-02-18 20:09  curvelet变换\新建 文本文档.txt

     文件        224  2013-02-18 18:48  curvelet变换\新建 Microsoft Word 文档.files\filelist.xml

     文件     113223  2013-02-18 18:48  curvelet变换\新建 Microsoft Word 文档.files\image001.png

     文件      21898  2013-02-18 18:48  curvelet变换\新建 Microsoft Word 文档.files\image002.gif

    ..A.SH.      9216  2013-02-27 09:46  curvelet变换\新建 Microsoft Word 文档.files\Thumbs.db

     目录          0  2013-02-27 09:38  curvelet变换\新建 Microsoft Word 文档.files

     目录          0  2013-02-27 09:38  curvelet变换

----------- ---------  ---------- -----  ----

              1857256                    28

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