I=imread（‘Lena256.bmp‘）;
figure（1）;
subplot（121）;imshow（I）;
[cs]=wavedec2（I3‘db2‘）;
ca3=appcoef2（cs‘db2‘3）;
ch3=detcoef2（‘h‘cs3）;
cv3=detcoef2（‘v‘cs3）;
cd3=detcoef2（‘d‘cs3）;
ch2=detcoef2（‘h‘cs2）;
cv2=detcoef2（‘v‘cs2）;
cd2=detcoef2（‘d‘cs2）;
ch1=detcoef2（‘h‘cs1）;
cv1=detcoef2（‘v‘cs1）;
cd1=detcoef2（‘d‘cs1）;
A2=[ca3*4ch3*4;cv3*4cd3*4]
k=s（21）*2-s（31）
ch2=padarray（ch2[kk]1‘post‘）;
cv2=padarray（cv2[kk]1‘post‘）;
cd2=padarray（cd2[kk]1‘post‘）;
A1=[A2ch2*4;cv2*4cd2*4]
k=s（21）*4-s（41）
ch1=padarray（ch1[kk]1‘post‘）;
cv1=padarray（cv1[kk]1‘post‘）;
cd1=padarray（cd1[kk]1‘post‘）;
A=[A1ch1*4;cv1*4cd1*4]
min=min（A（:））;
max=max（A（:））;
figure（1）;
subplot（122）;imshow（A[minmax]）;

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件????????765??2010-04-10?22:55??lena三級小波分解\Untitled11.m

?????文件??????66614??1996-10-24?16:44??lena三級小波分解\LENA256.BMP

?????目錄??????????0??2010-05-04?15:02??lena三級小波分解

-----------?---------??----------?-----??----

????????????????67379????????????????????3