
d1=wrcoef('d',c,l,'db6',1)
d2=wrcoef('d',c,l,'db6',2)
d3=wrcoef('d',c,l,'db6',3)
d4=wrcoef('d',c,l,'db6',4)
d5=wrcoef('d',c,l,'db6',5)
a5=wrcoef('a',c,l,'db6',5)
plot(d1) %%%输出d1的图像
合并的话,直接用x1=a5+d5+d4+d3就可以吧
程序是下面这样,但只能处理长宽一样的方形图像,灰度和彩色图像都可,要用其他图像只需把Lena.bmp改为其他图像,但图像要保存在m文件所在路径下。下面还有一个运行后的图像(之一),希望能对你有所帮助。clearclc
%%%%%%%%%%测试图像只能是方形图像,长宽像素一样。
f=imread('Lena.bmp')%%读取图像数据,图像只能保存在m文件所在的路径下
d=size(f)
if length(d)>2
f=rgb2gray((f))%%%%%%%%如果是彩色图像则转化为灰度图
end
T=d(1)
SUB_T=T/2
% 2.进行二维小波分解
l=wfilters('db10','l') % db10(消失矩为10)低通分解滤波器冲击响应(长度为20)
L=T-length(l)
l_zeros=[l,zeros(1,L)] % 矩阵行数与输入图像一致,为2的整数幂
h=wfilters('db10','h') % db10(消失矩为10)高通分解滤波器冲击响应(长度为20)
h_zeros=[h,zeros(1,L)] % 矩阵行数与输入图像一致,为2的整数幂
for i=1:T % 列变换
row(1:SUB_T,i)=dyaddown( ifft( fft(l_zeros).*fft(f(:,i)') ) ).' % 圆周卷积<->FFT
row(SUB_T+1:T,i)=dyaddown( ifft( fft(h_zeros).*fft(f(:,i)') ) ).' % 圆周卷积<->FFT
end
for j=1:T % 行变换
line(j,1:SUB_T)=dyaddown( ifft( fft(l_zeros).*fft(row(j,:)) ) ) % 圆周卷积<->FFT
line(j,SUB_T+1:T)=dyaddown( ifft( fft(h_zeros).*fft(row(j,:)) ) ) % 圆周卷积<->FFT
end
decompose_pic=line % 分解矩阵
% 图像分为四块
lt_pic=decompose_pic(1:SUB_T,1:SUB_T) % 在矩阵左上方为低频分量--fi(x)*fi(y)
rt_pic=decompose_pic(1:SUB_T,SUB_T+1:T) % 矩阵右上为--fi(x)*psi(y)
lb_pic=decompose_pic(SUB_T+1:T,1:SUB_T) % 矩阵左下为--psi(x)*fi(y)
rb_pic=decompose_pic(SUB_T+1:T,SUB_T+1:T) % 右下方为高频分量--psi(x)*psi(y)
% 3.分解结果显示
figure(1)
subplot(2,1,1)
imshow(f,[]) % 原始图像
title('original pic')
subplot(2,1,2)
image(abs(decompose_pic)) % 分解后图像
title('decomposed pic')
figure(2)
% colormap(map)
subplot(2,2,1)
imshow(abs(lt_pic),[]) % 左上方为低频分量--fi(x)*fi(y)
title('\Phi(x)*\Phi(y)')
subplot(2,2,2)
imshow(abs(rt_pic),[]) % 矩阵右上为--fi(x)*psi(y)
title('\Phi(x)*\Psi(y)')
subplot(2,2,3)
imshow(abs(lb_pic),[]) % 矩阵左下为--psi(x)*fi(y)
title('\Psi(x)*\Phi(y)')
subplot(2,2,4)
imshow(abs(rb_pic),[]) % 右下方为高频分量--psi(x)*psi(y)
title('\Psi(x)*\Psi(y)')
% 5.重构源图像及结果显示
% construct_pic=decompose_matrix'*decompose_pic*decompose_matrix
l_re=l_zeros(end:-1:1) % 重构低通滤波
l_r=circshift(l_re',1)' % 位置调整
h_re=h_zeros(end:-1:1) % 重构高通滤波
h_r=circshift(h_re',1)' % 位置调整
top_pic=[lt_pic,rt_pic] % 图像上半部分
t=0
for i=1:T % 行插值低频
if (mod(i,2)==0)
topll(i,:)=top_pic(t,:)% 偶数行保持
else
t=t+1
topll(i,:)=zeros(1,T) % 奇数行为零
end
end
for i=1:T % 列变换
topcl_re(:,i)=ifft( fft(l_r).*fft(topll(:,i)') )' % 圆周卷积<->FFT
end
bottom_pic=[lb_pic,rb_pic] % 图像下半部分
t=0
for i=1:T % 行插值高频
if (mod(i,2)==0)
bottomlh(i,:)=bottom_pic(t,:) % 偶数行保持
else
bottomlh(i,:)=zeros(1,T) % 奇数行为零
t=t+1
end
end
这个只是一级分解,matlab自带的函数可以实现多级分解,级数由编程者自己确定。
是的,是一样的。
小波分析的应用范围十分广泛,任何有关信号处理与信号分析的领域及行业都有很多应用。如一维信号的多分辨分析,信号在不同尺度下的特征提取,信号去噪声处理,信号奇异点检测,信号数据压缩,信号时频分析等。二维信号的处理主要是图像信号,包...欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)