Re: Frequency shifting an audio file tia sal22
- To: mathgroup at smc.vnet.net
- Subject: [mg103275] Re: Frequency shifting an audio file tia sal22
- From: sal22 <ratullochjk2-delthispart at gmail.com>
- Date: Sat, 12 Sep 2009 07:26:20 -0400 (EDT)
- References: <h7l90h$3bc$1@smc.vnet.net> <h7o88q$nl9$1@smc.vnet.net>
On Thu, 03 Sep 2009 11:11:22 +0000, Hans Michel wrote:
>>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
>>
Thanks :-)