Might be a little late, but here is the old example of playing the sound of the Riemann-Siegel function (a function constructed so that its zeroes correspond to the zeroes of $\zeta\left(\frac12+it\right)$):

Play[RiemannSiegelZ[2000 t], {t, 0, 15},
     PlayRange -> {-20, 20}, SampleRate -> 244800./11]

This might be interesting: http://matecmaticaacustica.weebly.com/graph-and-sound-of-sine-waves.html and http://matecmaticaacustica.weebly.com/fourier-synthesis.html hope that helps, regards Jose

Attachments:

synthesis1.cdf

Glad you found it useful!

To start, I suggest a slight modification in the function to avoid indeterminate values:

zwave[n_, x_] := Cos[N@Im[ZetaZero[n]] Log[x + $MachineEpsilon]]

There are two main ways to turn a function into an audio signal:

• use the function to compute the samples directly:

  AudioNormalize@AudioGenerator[Sum[zwave[n, #], {n, 1, 100}] &]
  AudioGenerator[zwave[100, #] &]
  

This of course produces something useful only if the frequencies contained in the signal are high enough to be audible (you can check once the generation is done you can check with Periodogram and Spectrogram).

• use the function to control the frequency of an oscillator:

  AudioGenerator[{"Sin", 400 + 200*zwave[1, #] &}]
  AudioGenerator[{"Sin", 400 + 200*Sum[zwave[n, #], {n, 1, 60}] &}, 10]
  

This usually produces better results for more slowly varying functions.