Crie uma melodia com os dígitos de Pi
Selecione os primeiros 100 dígitos de na base 24.
In[1]:=

digits = First@RealDigits[\[Pi], 24, 100]
Out[1]=

Use-os para controlar o tom de um oscilador sinusoidal.
In[2]:=

midiToFreq[m_] := 2^((m - 69)/12)*440.
AudioGenerator[{"Sin", TimeSeries[midiToFreq[50 + digits], {0, 10}]}]