The Math Forum

Search All of the Math Forum:

Views expressed in these public forums are not endorsed by NCTM or The Math Forum.

Math Forum » Discussions » Inactive » comp.soft-sys.math.mathematica

Notice: We are no longer accepting new posts, but the forums will continue to be readable.

Topic: WAV file Export and Import
Replies: 2   Last Post: Feb 21, 2010 4:23 AM

Advanced Search

Back to Topic List Back to Topic List Jump to Tree View Jump to Tree View   Messages: [ Previous | Next ]
Goyder Dr HGD

Posts: 59
Registered: 1/29/05
WAV file Export and Import
Posted: Feb 2, 2010 3:24 AM
  Click to see the message monospaced in plain text Plain Text   Click to reply to this topic Reply

I am trying to Export and Import WAV files. Unfortunately, in the
example below the file that I export becomes garbled and is not the
same when re - Imported. Am I doing something wrong? Is there a work
around? You can tell from both the sound and the data that something
is going wrong. The imported data is completely different to that
which is generated initially.

Version 7 Windows

Thanks in advance

Hugh Goyder

d = Table[8*Sin[100*2*Pi*t], {t, 0, 2. - 1/4000., 1/4000.}];


ListPlot[Take[d, {1, 100}]]

d1 = Sound[SampledSoundList[d, 4000]]

Export["try1.WAV", d1]

g = Import["try1.WAV", "SampleRate" -> 4000]

ListPlot[Take[g[[1, 1, 1]], {1, 100}], Joined -> False,
PlotRange -> All]

Point your RSS reader here for a feed of the latest messages in this topic.

[Privacy Policy] [Terms of Use]

© The Math Forum at NCTM 1994-2018. All Rights Reserved.