function?[?T?]?=?get_wavelet（?Input?）
I=double（Input）;
I1=double（I）/255;%歸一化處理
[mn]=wavedec2（I14‘sym4‘）;%采用sym4小波對圖像進行4層小波分解
[H1V1D1]=detcoef2（‘all‘mn1）;%提取二維小波分解的一層變換?
[H2V2D2]=detcoef2（‘all‘mn2）;%提取二維小波分解的二層變換?
[H3V3D3]=detcoef2（‘all‘mn3）;%提取二維小波分解的三層變換
[H4V4D4]=detcoef2（‘all‘mn4）;%提取二維小波分解的四層變換
cal=appcoef2（mn‘sym4‘4）;%提取小波分解概貌系數
CH1=size（H1）;
???s1=0;
???for?i=1:CH1（1）
???????for?j=1:CH1（2）
???????????s1=s1+abs（H1（ij））;%abs求絕對值
???????end
???end
???u1=（1/（CH1（1）*CH1（2）））*s1;%求均值
??
CH2=size（H2）;
???s2=0;
???for?i=1:CH2（1）
???????for?j=1:CH2（2）
???????????s2=s2+abs（H2（ij））;%abs求絕對值
???????end
???end
???u2=（1/（CH2（1）*CH2（2）））*s2;%求均值
?CH3=size（H3）;
???s3=0;
???for?i=1:CH3（1）
???????for?j=1:CH3（2）
???????????s3=s3+abs（H3（ij））;%abs求絕對值
???????end
???end
???u3=（1/（CH3（1）*CH3（2）））*s3;%求均值??
??CH4=size（H4）;
???s4=0;
???for?i=1:CH4（1）
???????for?j=1:CH4（2）
???????????s4=s4+abs（H4（ij））;%abs求絕對值
???????end
???end
???u4=（1/（CH4（1）*CH4（2）））*s4;%求均值
CV1=size（V1）;
???s5=0;
???for?i=1:CV1（1）
???????for?j=1:CV1（2）
???????????s5=s5+abs（V1（ij））;%abs求絕對值
???????end
???end
???u5=（1/（CV1（1）*CV1（2）））*s5;%求均值
??
CV2=size（V2）;
???s6=0;
???for?i=1:CV2（1）
???????for?j=1:CV2（2）
???????????s6=s6+abs（V2（ij））;%abs求絕對值
???????end
???end
???u6=（1/（CV2（1）*CV2（2）））*s6;%求均值
?CV3=size（V3）;
???s7=0;
???for?i=1:CV3（1）
???????for?j=1:CV3（2）
???????????s7=s7+abs（V3（ij））;%abs求絕對值
???????end
???end
???u7=（1/（CV3（1）*CV3（2）））*s5;%求均值
CV4=size（V4）;
???s8=0;
???for?i=1:CV4（1）
???????for?j=1:CV4（2）
???????????s8=s8+abs（V4（ij））;%abs求絕對值
???????end
???end
???u8=（1/（CV4（1）*CV4（2）））*s6;%求均值

CD1=size（D1）;
???s9=0;
???for?i=1:CD1（1）
???????for?j=1:CD1（2）
???????????s9=s9+abs（D1（ij））;%abs求絕對值
???????end
???end
???u9=（1/（CD1（1）*CD1（2）））*s9;%求均值
???
CD2=size（D2）;
???s10=0;
???for?i=1:CD2（1）
???????for?j=1:CD2（2）
???????????s10=s10+abs（D2（ij））;%abs求絕對值
???????end
???end
???u10=（1/（CD2（1）*CD2（2）））*s10;%求均值
CD3=size（D3）;
???s11=0;
???for?i=1:CD3（1）
???????for?j=1:CD3（2）
???????????s11=s11+abs（D2（ij））;%abs求絕對值
???????end
???end
???u11=（1/（CD3（1）*CD3（2）））*s11;%求均值
CD4=size（D4）;
???s12=0;
???for?i=1:CD4（1）
???????for?j=1:CD4（2）
???????????s12=s12+abs（D4（ij））;%abs求絕對值
???????end
???end
???u12=（1/（CD4（1）*CD4（2）））*s12;%求均值???
CCAL=size（cal）;
???s13=0;
???for?i=1:CCAL（1）
???????for?j=1:CCAL（2）
???????????s13=s13+abs（cal（ij））;%abs求絕對值
???????end
???end
???u13=（1/（CCAL（1）*CCAL（2）））*s13;%求均值
???
???
???T=[u1u2u3u4u5u6u7u8u9u10u11u12u13];

???

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2014-09-04?21:32??運行程序\
?????文件??????133563??2014-05-21?10:14??運行程序\10.png
?????文件???????97083??2014-05-21?10:19??運行程序\13.png
?????文件??????106199??2014-05-21?10:20??運行程序\20.png
?????文件???????97300??2014-05-21?10:17??運行程序\4.png
?????文件????????8990??2014-05-21?17:17??運行程序\50.png
?????文件????????7739??2014-05-21?17:17??運行程序\51.png
?????文件???????26883??2014-05-21?17:18??運行程序\52.png
?????文件???????86837??2014-05-21?10:18??運行程序\8.png
?????文件????????2755??2014-05-11?16:29??運行程序\get_wavelet.asv
?????文件????????2774??2014-05-24?19:25??運行程序\get_wavelet.m
?????文件????????2377??2014-05-21?10:19??運行程序\oushijuli2.m
?????文件?????6157251??2014-05-20?15:09??運行程序\oushijuli2.mat
?????文件????????5884??2014-05-21?17:10??運行程序\shenjingwangluo2.m
?????文件????????2707??2014-05-12?13:44??運行程序\ture4.asv
?????文件????????2745??2014-05-12?13:46??運行程序\ture4.m
?????文件?????2927847??2014-05-11?08:43??運行程序\ture4.mat
?????文件????????1967??2014-05-12?13:39??運行程序\wode2.asv
?????文件?????????887??2014-05-11?12:55??運行程序\zitu16.m
?????文件?????????252??2014-05-09?18:16??運行程序\zitu4.m