Filtrado de audio
La mayoría de los filtros dan soporte inmediato al filtrado de señales de audio.
In[1]:=
![Click for copyable input](assets.es/audio-filtering/In_69.png)
a = ExampleData[{"Audio", "Apollo11SmallStep"}, "Audio"]
Filtro de paso bajo.
In[2]:=
![Click for copyable input](assets.es/audio-filtering/In_70.png)
lp = LowpassFilter[a, Quantity[800, "Hz"], 101]
Filtro de paso alto.
In[3]:=
![Click for copyable input](assets.es/audio-filtering/In_71.png)
hp = HighpassFilter[a, Quantity[1600, "Hz"], 101]
In[4]:=
![Click for copyable input](assets.es/audio-filtering/In_72.png)
Periodogram[{a, lp, hp}, 2000, PlotRange -> {{0, 3000}, Automatic},
Frame -> True, ImageSize -> Medium,
PlotLegends -> {"Original", "Lowpass", "Highpass"}]
Out[4]=
![](assets.es/audio-filtering/O_33.png)
Elimine el ruido usando un filtro de Wiener.
In[5]:=
![Click for copyable input](assets.es/audio-filtering/In_73.png)
WienerFilter[a, 25]