Programming Fail
- To: mathgroup at smc.vnet.net
- Subject: [mg132019] Programming Fail
- From: Dean Rosenthal <deanrosenthal at gmail.com>
- Date: Sun, 17 Nov 2013 18:22:15 -0500 (EST)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- Delivered-to: l-mathgroup@wolfram.com
- Delivered-to: mathgroup-outx@smc.vnet.net
- Delivered-to: mathgroup-newsendx@smc.vnet.net
Hi:
My question is going to take all of you about a split second to answer.
Sadly, programming is something I seem to be congenitally incapable of
teaching myself and doing well. I usually just cut and paste specifics
into prewritten algorithms.
If you do this
pitchMap = {1 -> {"C4", "D4"}, 2 -> "D4", 3 -> "E4", 4 -> "F4", 5 -> "G4"};
Sound[Thread[SoundNote[Flatten[IntegerPartitions[5]] /. pitchMap]]]
You get a music player and can play the result.
If you do this:
A = NestList[
StringReplace[#, {"0" -> "2", "2" -> "12", "1" -> "23", "3" -> "45",
"4" -> "56"}] &, "0", 7]
pitchMap = {0 -> "B4", 1 -> "C4", 2 -> "D4", 3 -> "E4", 4 -> "F4", 5 ->
"G4",
6 -> "A4"};
Sound[Thread[SoundNote[Flatten[A]] /. pitchMap]]]
You get nothing, just output. See what I did there? I substituted,
because that's what you do if you don't know how to program! On the face
of things, I can't see why it wouldn't work, but I've wasted at least an
hour going through documentation and Googling and trying different
approaches. I'm not a programmer and I can't seem to teach myself how to
do this, ideas?
Thanks,
Dean
- Follow-Ups:
- Re: Programming Fail
- From: Bob Hanlon <hanlonr357@gmail.com>
- Re: Programming Fail
- From: Alex Krasnov <akrasnov@cory.eecs.berkeley.edu>
- Re: Programming Fail