Wolfram
Mathematica
8의 신기능: 웨이블릿 분석
◄
이전
|
다음
►
응용 분야
웨이블릿 족의 특성 얻기
각각의 웨이블릿 족의 스케일 함수 (
), 웨이블릿 함수 (
), 필터 계수를 직접 얻고, 그들을 사용하여 웨이블릿 변환을 지정하기도 합니다.
In[1]:=
X
WaveletPhi[ShannonWavelet[], x]
Out[1]=
In[2]:=
X
WaveletPsi[ShannonWavelet[], x]
Out[2]=
In[3]:=
X
WaveletFilterCoefficients[ShannonWavelet[]]
Out[3]=
In[4]:=
X
dwd = DiscreteWaveletTransform[ Table[ Sin[t^2], {t, -3 \[Pi], 3 \[Pi], (6 \[Pi])/1023}], ShannonWavelet[], 5]
Out[4]=
In[5]:=
X
dwd[All, {"ListPlot", ImageSize -> 160}]
Out[5]=