Mathematica code: v1 := {1 + Cos[Pi/3], Sin[Pi/3]} v2 := {0, 2 Sin[Pi/3]} Animate[   Graphics[      Table[Rotate[Table[{PointSize[.032],         Point[           Table[ {Cos[n*2*Pi/6], Sin[n*2*Pi/6]} + m1*v1 + m2*v2,         {n, 0, 5}]]},      {m1, -15, 15}, {m2, -15, 15}], t*o], {o, 0, 1, 1}],   PlotRange -> 15, ImageSize -> 500],{t, 0, Pi/10, Pi/120}]

Mathematica code:

v1 := {1 + Cos[Pi/3], Sin[Pi/3]}
v2 := {0, 2 Sin[Pi/3]}

Animate[
  Graphics[
     Table[Rotate[Table[{PointSize[.032],
        Point[
          Table[
           {Cos[n*2*Pi/6], Sin[n*2*Pi/6]} + m1*v1 + m2*v2,
          {n, 0, 5}]]},
     {m1, -15, 15}, {m2, -15, 15}], t*o], {o, 0, 1, 1}],
  PlotRange -> 15, ImageSize -> 500],
{t, 0, Pi/10, Pi/120}]
Notes: 194 11/11/11 — 12:04pm Filed under: #GIF  #Mathematica  #points  #Moire Pattern 
 
  1. colorsdotslines reblogged this from intothecontinuum
  2. ishinemydream reblogged this from proofmathisbeautiful
  3. notimmunetoit reblogged this from proofmathisbeautiful
  4. kirish reblogged this from nerdinlove
  5. ep12390 reblogged this from purehemp
  6. serotonin-extremism reblogged this from nerdinlove
  7. chroniques reblogged this from nerdinlove
  8. mdlnnttng reblogged this from iwillharpoonyou
  9. tolivebythesea reblogged this from nerdinlove
  10. stealth-mode reblogged this from nerdinlove
  11. blogi0 reblogged this from nerdinlove
  12. jeanacker reblogged this from nerdinlove
  13. porquenomedalagana reblogged this from gatricio
  14. gatricio reblogged this from e-preciiouz
  15. iwillharpoonyou reblogged this from nerdinlove
  16. purplegem reblogged this from nerdinlove
  17. e-preciiouz reblogged this from nerdinlove
  18. nerdinlove reblogged this from intothecontinuum
  19. rootcat reblogged this from intothecontinuum
  20. -beautiful-insanity- reblogged this from contemplatingmadness
  21. isometries reblogged this from intothecontinuum
  22. anna-maria-v reblogged this from proofmathisbeautiful
  23. rufushund reblogged this from proofmathisbeautiful
  24. davidhagar reblogged this from proofmathisbeautiful
  25. chelsapp reblogged this from proofmathisbeautiful and added:
    Mathematica code:...v1 := {1 + Cos[Pi/3], Sin[Pi/3]} v2 := {0, 2 Sin[Pi/3]} Animate[...
  26. thisisourbattlesong reblogged this from pythagoreantheorem
  27. pythagoreantheorem reblogged this from proofmathisbeautiful
  28. ucmst-blog reblogged this from proofmathisbeautiful
  29. sdbrown reblogged this from intothecontinuum