MathGroup Archive 2010

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: WAV file Export and Import

  • To: mathgroup at smc.vnet.net
  • Subject: [mg107605] Re: WAV file Export and Import
  • From: divisor <congruentialuminaire at yahoo.com>
  • Date: Fri, 19 Feb 2010 03:34:58 -0500 (EST)
  • References: <hk8nff$8a4$1@smc.vnet.net>

Hello Hugh:

Did you figure this out? And why should [[1,1,1]] have the source
data?

TIA.

Roger Williams
Franklin Laboratory

On Feb 2, 12:24 am, Hugh Goyder <h.g.d.goy... at cranfield.ac.uk> wrote:
> I am trying toExportand ImportWAVfiles. Unfortunately, in the
> example below the file that Iexportbecomes 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.}];
>
> Length[d]
>
> 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]



  • Prev by Date: does it make sense ? The conditional
  • Next by Date: Nested list data extraction bottleneck
  • Previous by thread: WAV file Export and Import
  • Next by thread: Re: WAV file Export and Import