%例程6－8??方波信號的離散小波變換
%?e.g.6-8.m?for?example6-8;
%test?the?function?of?dwt

clear?all;
t=0:.01*pi:10*pi;
x=square（t80）;
X=x+randn（size（x））/10;
subplot（311）;?plot（tX）;
xlabel（‘Time?t‘）;
axis（[0?11*pi??-2?2]）;
ylabel（‘Amplitude?X‘）;
title（‘Analyzed?signal?‘）
?
%?Perform?single-level?discrete?wavelet?transform?of?X?by?haar
%and?the?kind?of?signal?extension?mode?is?zero-padding?extension.??
[ca1cd1]?=?dwt（X‘haar‘‘mode‘‘zpd‘）;?
subplot（323）;?plot（ca1）;?title（‘Approx.?coef.?for?haar‘）;?
subplot（324）;?plot（cd1）;?title（‘Detail?coef.?for?haar‘）;
?
%?Perform?single-level?discrete?wavelet?transform?of?X?by?coif4use?the?default?mode?.
%?and?observe?edge?effects?for?last?coefficients.
[ca2cd2]?=?dwt（X‘coif4‘‘mode‘‘sym‘）;
subplot（325）;?plot（ca2）;?title（‘Approx.?coef.?for?coif4‘）;?
subplot（326）;?plot（cd2）;?title（‘Detail?coef.?for?coif4‘）;

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

?????文件????????885??2007-07-14?17:19??連續信號的小波變換\6-8.m

?????目錄??????????0??2010-03-09?17:22??連續信號的小波變換

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

??????????????????885????????????????????2