Pure Tones with Sample Rate

Manipulate[Play[Sin[2Pi f t],{t,0,1},SampleRate->s],
{{f,440,"frequency of tone"},50,10000,1,Appearance->"Labeled"},{{s,8000,"sample rate"},50,10000,1,Appearance->"Labeled"}]

THIS NOTEBOOK IS THE SOURCE CODE FROM

"Pure Tones with Sample Rate" from The Wolfram Demonstrations Project
 http://demonstrations.wolfram.com/PureTonesWithSampleRate/

Contributed by: Stephen Wolfram

A full-function Wolfram Mathematica 6 system is required to edit this notebook.
GET WOLFRAM MATHEMATICA 6 »

© The Wolfram Demonstrations Project & Contributors   |   Terms of Use   |   Make a new version of this Demonstration »