Новое в системе Wolfram
Mathematica
9
◄
предыдущая
|
следующая
►
Новое в системе Wolfram
Mathematica
9
›
Встроенная обработка сигналов
Создание фильтров по низкочастотному прототипу
Создание аналогового низкочастотного фильтра Баттерворта, и его преобразование в другие типы.
In[1]:=
X
lowpass = ButterworthFilterModel[3, s]; highpass = TransferFunctionTransform[1/# &, lowpass]; bandpass = TransferFunctionTransform[(#^2 + 1)/(2 #) &, lowpass]; bandstop = TransferFunctionTransform[(2 #)/(#^2 + 1) &, lowpass];
In[2]:=
X
Plot[{Abs[lowpass[I x]], Abs[highpass[I x]], Abs[bandpass[I x]], Abs[bandstop[I x]]}, {x, 0, 5}, PlotRange -> All, PlotStyle -> {Thick, Automatic, Automatic, Automatic}, PlotLegends -> {"lowpass", "highpass", "bandpass", "bandstop"}]
Out[2]=