clear;
close?all;???????????????
??
X=imread（‘3.jpg‘）;??????????????
X=rgb2gray（X）;??
figure;
imshow（X‘InitialMagnification‘‘fit‘）;???????????????
title（‘原始圖像‘）;????????????????????
%對圖像用小波進行層小波分解??
[cs]=wavedec2（X2‘bior3.7‘）;??
%提取小波分解結構中的一層的低頻系數和高頻系數??
%ca1=appcoef2（cs‘bior3.7‘1）;??
ch1=detcoef2（‘h‘cs1）;??????%水平方向??
cv1=detcoef2（‘v‘cs1）;??????%垂直方向??
cd1=detcoef2（‘d‘cs1）;??????%斜線方向??
??
%各頻率成份重構??
a1=wrcoef2（‘a‘cs‘bior3.7‘1）;??
h1=wrcoef2（‘h‘cs‘bior3.7‘1）;??
v1=wrcoef2（‘v‘cs‘bior3.7‘1）;??
d1=wrcoef2（‘d‘cs‘bior3.7‘1）;??
c1=[a1h1;v1d1];??
%subplot（222）
figure;
imshow（c1[]‘InitialMagnification‘‘fit‘）;??
title?（‘分解后低頻和高頻信息‘）;??
??
%進行圖像壓縮??
%保留小波分解第一層低頻信息??
%首先對第一層信息進行量化編碼??
ca1=appcoef2（cs‘bior3.7‘1）;??
ca1=wcodemat（ca1440‘mat‘0）;??
%改變圖像高度并顯示??
ca1=0.5*ca1;??
%subplot（223）;
figure;
imshow（ca1[]‘InitialMagnification‘‘fit‘）;??
title（‘壓縮圖像‘）;??
??

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

?????文件???????1060??2018-04-13?00:32??tuxiangxiaobo.m

?????文件?????130108??2015-11-07?20:13??3.jpg

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

???????????????131168????????????????????2