[Flash 10 is required to watch video]

This video shows 52 seconds of continuous variation of the parameter a in the code given below. Jump in!

Music: “Pulses” by Steve Reich

r = .98

8.3 ≤ a ≤ 8.6

s = 600

Mathematica code:

Manipulate[
 Graphics[
  Line[
   Table[{-r^n*Sin[n*a], r^n*Cos[n*a]}, {n, 0, s}]],
 PlotRange -> .01],
{r, .1, 1}, {a, .001, 4*Pi, .001}, {s, 1, 800, 1}]
Notes: 49 11/18/11 — 4:10pm Filed under: #Mathematica  #Video  #lines  #CTD 
 
  1. ergotpoison reblogged this from vault--girl
  2. optimism-readjustment reblogged this from fromorganto-oregon
  3. palatial-bear-messages reblogged this from -dilatedmind
  4. secxtanx reblogged this from intothecontinuum
  5. maybelizabeth reblogged this from intothecontinuum
  6. freneticoeminimo reblogged this from intothecontinuum
  7. lust-thrust reblogged this from geometryofdopeness
  8. geometryofdopeness reblogged this from intothecontinuum
  9. do0omesh0t reblogged this from -dilatedmind
  10. carpenoct-m reblogged this from goodnightmoonxx
  11. goodnightmoonxx reblogged this from fromorganto-oregon
  12. fromorganto-oregon reblogged this from -dilatedmind
  13. -dilatedmind reblogged this from nephastopheles
  14. bindingaffinity reblogged this from intothecontinuum and added:
    I keep forgetting about Music For 18 Musicians.
  15. famicomdooooom8 reblogged this from jazjar
  16. nephastopheles reblogged this from rendezvous-for-two
  17. rendezvous-for-two reblogged this from manwithpenis
  18. phledglingphysicist reblogged this from intothecontinuum
  19. sk-1 reblogged this from manwithpenis
  20. rhydin reblogged this from intothecontinuum
  21. vault--girl reblogged this from intothecontinuum
  22. jazjar reblogged this from intothecontinuum
  23. amy-yes reblogged this from intothecontinuum
  24. intothecontinuum posted this