MathGroup Archive 2009

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

Search the Archive

Re: Frequency shifting an audio file tia sal22

  • To: mathgroup at smc.vnet.net
  • Subject: [mg102991] Re: Frequency shifting an audio file tia sal22
  • From: "Hans Michel" <hmichel at cox.net>
  • Date: Thu, 3 Sep 2009 07:11:23 -0400 (EDT)
  • References: <h7l90h$3bc$1@smc.vnet.net>

>From your mathematica notebook I don't clearly see how I helped.

But you want
40 beats per centisecond = 4000 beats per second.

Just repeat your list
Table[myInterpolation[x], {x, 0, 1, 1./200}]

Something like

rep = PadRight[Table[myInterpolation[x], {x, 0, 1, 1./200}], 40000,
Table[myInterpolation[x], {x, 0, 1, 1./200}]]

Then

Sound[SampledSoundList[rep, 44100]]

or
ListPlay[rep, SampleRate -> 44100]



"Rick T" <ratulloch at gmail.com> wrote in message 
news:h7l90h$3bc$1 at smc.vnet.net...
> Greetings all
>
> Frequency shifting an audio file tia sal22
>
> Thanks to the help of Sjoerd and Hans I have an audio file that is 1
> second long, but would like to create it
> so that it will play the same signal 4000 times a second at cd quality
> (44100).  I can create the 1 second file
> but I couldn't find a way to do a frequency shift.  So instead of
> creating a 1
> cycle signal it creates a file that has the original signal repeated
> 4000 times in 1 second.  Is this possible?
>
> tia sal22
>
> Link to mathematica file. 
> http://tools.onewithall.net/mathematica/math_question2.nb
> 



  • Prev by Date: Newbie questions on Font in notebook
  • Next by Date: Re: contourplot in xy plane of Graphics3D
  • Previous by thread: Frequency shifting an audio file tia sal22
  • Next by thread: Re: Frequency shifting an audio file tia sal22