December 13th, 2011 at 11:23PM

intothecontinuum:

High-Res (750x750)

Mathematica code:

Animate[
  Graphics[
    Rotate[
      Table[
         Circle[{100*Cos[i*Pi/12], 100*Sin[i*Pi/12]},
         t+(100 - n) (1 + Sign[100 - n])/2], 
      {n, 0, 100, 1},  {i, 0, 23, 1}],
    t*Pi/12],
  PlotRange -> 20, ImageSize ->750],
{t, 0, 1}]

  1. n0th1ng-useful reblogged this from proofmathisbeautiful
  2. havoc201 reblogged this from shiku22
  3. jweekend reblogged this from proofmathisbeautiful
  4. brianhugs reblogged this from intothecontinuum
  5. cmprtmntlr reblogged this from intothecontinuum
  6. ucmst-blog reblogged this from intothecontinuum
  7. helios reblogged this from proofmathisbeautiful
  8. chemfemme reblogged this from danicalifornia85
  9. here-there-this-that reblogged this from proofmathisbeautiful
  10. danicalifornia85 reblogged this from proofmathisbeautiful
  11. neon-wallflower reblogged this from intothecontinuum
  12. contemplatingstardust reblogged this from intothecontinuum
  13. ljferguson94 reblogged this from proofmathisbeautiful
  14. arcticfritillary reblogged this from proofmathisbeautiful
  15. tonyt reblogged this from proofmathisbeautiful
  16. sorry-was-all-i-could-be reblogged this from proofmathisbeautiful
  17. reason-in-time reblogged this from proofmathisbeautiful
  18. aisler reblogged this from proofmathisbeautiful
  19. idonthaveatumblr42 reblogged this from proofmathisbeautiful
  20. rulerfenrir reblogged this from proofmathisbeautiful
  21. beetree reblogged this from proofmathisbeautiful
  22. tinalouise reblogged this from proofmathisbeautiful
  23. bcplayground reblogged this from proofmathisbeautiful
84 notes Source: intothecontinuum
Short URL for this post: http://tmblr.co/Z-0gAxDEWKr1