Töne mit Mathematica

Play[5 * Sin[2^t], {t, 10, 14}] ;

[Graphics:../htmlfiles/schwebung_2.gif]

Play[Sin[2 π 440 * t], {t, 0, 5}] ;

[Graphics:../htmlfiles/schwebung_4.gif]

Quinte darüber, rein

Play[Sin[2 π 440 * 3/2 * t], {t, 0, 5}] ;

[Graphics:../htmlfiles/schwebung_6.gif]


Created by Mathematica  (May 26, 2006)