Новое в системе Wolfram
Mathematica
9
◄
предыдущая
|
следующая
►
Новое в системе Wolfram
Mathematica
9
›
Встроенная обработка сигналов
Временное дискретное преобразование Фурье фильтра скользящего среднего
Амплитудно-частотная характеристика двумерного фильтра скользящего среднего.
In[1]:=
X
H[u_, v_] = ListFourierSequenceTransform[1/25 \!\(\* TagBox[ RowBox[{"(", "", GridBox[{ {"1", "1", "1", "1", "1"}, {"1", "1", "1", "1", "1"}, {"1", "1", "1", "1", "1"}, {"1", "1", "1", "1", "1"}, {"1", "1", "1", "1", "1"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}, "Items" -> {}, "ItemsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}, "Items" -> {}, "ItemsIndexed" -> {}}], "", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]\), {u, v}]
Out[1]=
In[2]:=
X
Plot3D[Abs[H[u, v]], {u, -\[Pi], \[Pi]}, {v, -\[Pi], \[Pi]}, PlotRange -> All, Mesh -> False, ImageSize -> Medium]
Out[2]=