Proof
  • November 12th
    194 notes
    Source
    intothecontinuum:

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}]
intothecontinuum:

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}]

    intothecontinuum:

    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}]
    1. egyptiansushi liked this
    2. notimmunetoit reblogged this from proofmathisbeautiful
    3. notnothin liked this
    4. manemaze liked this
    5. kirish reblogged this from nerdinlove
    6. shadowsdarkrealm reblogged this from pathosforbathos
    7. shadowsdarkrealm liked this
    8. pathosforbathos reblogged this from intothecontinuum
    9. halfasian reblogged this from intothecontinuum
    10. ep12390 reblogged this from purehemp
    11. serotonin-extremism reblogged this from nerdinlove
    12. chroniques reblogged this from nerdinlove
    13. mdlnnttng reblogged this from iwillharpoonyou
    14. tolivebythesea reblogged this from nerdinlove
    15. comeonflee liked this
    16. stealth-mode liked this
    17. stealth-mode reblogged this from nerdinlove
    18. drumbeatsofyourheart liked this
    19. 123skittles321 liked this
    20. blogi0 reblogged this from nerdinlove
    21. notational liked this
    22. jeanacker reblogged this from nerdinlove
    23. secondhandnature liked this
    24. serotonin-extremism liked this
    25. porquenomedalagana reblogged this from gatricio
    26. wolfnopatrick liked this
    27. gatricio reblogged this from e-preciiouz
    28. iwillharpoonyou reblogged this from nerdinlove
    29. purplegem reblogged this from nerdinlove
    30. e-preciiouz reblogged this from nerdinlove
    31. nerdinlove reblogged this from intothecontinuum
    32. rootcat reblogged this from intothecontinuum
    33. brainprivacy liked this
    34. -beautiful-insanity- reblogged this from contemplatingmadness
    35. isometries reblogged this from intothecontinuum
    36. anna-maria-v reblogged this from proofmathisbeautiful
    37. whylan liked this
    38. rootcat liked this
    39. rufushund reblogged this from proofmathisbeautiful
    40. davidhagar reblogged this from proofmathisbeautiful
    41. demi05 liked this
    42. tyb liked this
    43. queroro liked this
    44. chelsapp reblogged this from proofmathisbeautiful and added:
      Mathematica code:...v1 := {1 + Cos[Pi/3], Sin[Pi/3]} v2 := {0, 2 Sin[Pi/3]} Animate[...
    45. hellosamichan liked this
    46. thisisourbattlesong reblogged this from pythagoreantheorem
    47. pythagoreantheorem reblogged this from proofmathisbeautiful
    48. ucmst-blog reblogged this from proofmathisbeautiful
    49. dialectics8 liked this
    50. sdbrown reblogged this from intothecontinuum
    51. Show more notesLoading...
RSS Archive
Ask me anything Submit
Hosted by
  • heathernicolezilla