Новое в системе Wolfram
Mathematica
9
◄
предыдущая
|
следующая
►
Новое в системе Wolfram
Mathematica
9
›
Встроенная обработка сигналов
Создание аналогово эллиптического фильтра
Создание эллиптического фильтра низких частот и построение его амплитудно-частотной характеристики (АЧХ), отображающей идеальные характеристики фильтра.
In[1]:=
X
\[Omega]p = 1.; \[Omega]s = 1.2; ap = 1.; as = 20.;
In[2]:=
X
tf = EllipticFilterModel[{"Lowpass", {\[Omega]p, \[Omega]s}, {ap, as}}];
In[3]:=
X
gp = 10^(-ap/20); gs = 10^(-as/20);
In[4]:=
X
Plot[Abs[tf[I*\[Omega]]], {\[Omega], 0, 3}, PlotRange -> All, Epilog -> {Pink, Dashed, Line[{{0, gp}, {\[Omega]p, gp}, {\[Omega]p, gs}}], Line[{{\[Omega]s, gp}, {\[Omega]s, gs}, {3., gs}}]}]
Out[4]=