콤 필터링
콤 필터의 이산 전달 함수를 정의합니다.
In[1]:=

combFilterModel[f_, \[Alpha]_, sr_: 44100] :=
TransferFunctionModel[{{1/( 1 - \[Alpha] z^-Round[sr/f])}}, z,
SamplingPeriod -> 1/sr]
In[2]:=

combFilterModel[300, \[Alpha]]
Out[2]=

BodePlot을 사용하여 전달 함수를 플롯합니다.
In[3]:=

BodePlot[combFilterModel[300, -.9], {0, 20000},
ScalingFunctions -> {"Linear", Automatic}, PlotLayout -> "Magnitude",
ImageSize -> Medium]
Out[3]=

RecurrenceFilter를 사용하여 오디오 오브젝트에 필터를 적용합니다.
In[4]:=

a = AudioNormalize[Import["ExampleData/rule30.wav"]]
In[5]:=

RecurrenceFilter[combFilterModel[300, -.9], a]