Filtrage en peigne
Définissez la fonction de transfert discrète pour un filtre en peigne.
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]=
Tracez la fonction de transfert à l'aide de BodePlot.
In[3]:=
BodePlot[combFilterModel[300, -.9], {0, 20000},
ScalingFunctions -> {"Linear", Automatic}, PlotLayout -> "Magnitude",
ImageSize -> Medium]Out[3]=
Filtrez un objet audio à l'aide de RecurrenceFilter.
In[4]:=
a = AudioNormalize[Import["ExampleData/rule30.wav"]]Out[4]=
In[5]:=
RecurrenceFilter[combFilterModel[300, -.9], a]Out[5]=
