Erzeugen Sie eine Melodie aus den Ziffern der Kreiszahl

Wählen Sie die ersten 100 Stellen von in Basis 24 aus.

In[1]:=

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

Out[1]=

Verwenden Sie diese, um die Tonhöhe eines Sinus-Oszillators zu steuern.

In[2]:=

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

Out[2]=