Визуализация аудио

Визуализируем волну звукового сигнала.

In[1]:=

a = ExampleData[{"Audio", "Bird"}, "Audio"]

Out[1]=

In[2]:=

AudioPlot[a, Appearance -> "Discrete", PlotRange -> All, ImageSize -> Medium]

Out[2]=

Визуализируем спектрограмму звукового сигнала.

In[3]:=

Spectrogram[a, ImageSize -> Medium, PlotRange -> {All, {0, 15000}}]

Out[3]=

Рассмотрим спектрограмму аудио-сигнала.

In[4]:=

Periodogram[a, 1000, ImageSize -> Medium]

Out[4]=