figure13.m

是一本教科书的各个章节的源程序代码,适合初学数字图像的人

load tire;
figure(1); image(X); colormap(map)
title('原始图像');
axis square
[c, s]=wavedec2(X, 2, 'db3');
[thr, sorh, keepapp]=ddencmp('cmp', 'wv', X);
[Xcomp, cxc, lxc, perf0, perfl2]=wdencmp('gbl', c, s, 'db3', 2, thr, sorh, keepapp);
figure(2); image(Xcomp); colormap(map)
title('压缩图像');
axis square
disp('小波分解系数中置0的系数个数百分比:');
perf0
disp('压缩后图像剩余能量百分比:');
perfl2