Wolfram 语言

计算音频

音频滤波

大部分内置滤波器可直接支持对音频信号的滤波.

In[1]:=
Click for copyable input
a = ExampleData[{"Audio", "Apollo11SmallStep"}, "Audio"]
Out[1]=

低通滤波器.

In[2]:=
Click for copyable input
lp = LowpassFilter[a, Quantity[800, "Hz"], 101]
Out[2]=

高通滤波器.

In[3]:=
Click for copyable input
hp = HighpassFilter[a, Quantity[1600, "Hz"], 101]
Out[3]=
In[4]:=
Click for copyable input
Periodogram[{a, lp, hp}, 2000, PlotRange -> {{0, 3000}, Automatic}, Frame -> True, ImageSize -> Medium, PlotLegends -> {"Original", "Lowpass", "Highpass"}]
Out[4]=

用维纳滤波器移除杂音.

In[5]:=
Click for copyable input
WienerFilter[a, 25]
Out[5]=

相关范例

de en es fr ja ko pt-br ru