Inspired by Vasilj Godzh

Mathematica code:

s[q_] := (SeedRandom[q]; RandomReal[])r[S_, a_, v_, w_, t_] :=  S (1 + .05 Sin[v*a] Cos[w*a] + .1 Cos[8*a] + .025 Sin[a + t])F[Q_, S_, M_, v_, w_, th_, t_] := {EdgeForm[{AbsoluteThickness[th], Black}], FaceForm[White],  Polygon[   Table[    {{0, 0},     {r[S, (a + s[Q*a]) 2 Pi/M, v, w, t] Cos[(a + s[Q*a]) 2 Pi/M],      r[S, (a + s[Q*a]) 2 Pi/M, v, w, t] Sin[(a + s[Q*a]) 2 Pi/M]},     {r[S, (a + 1 + s[Q (Mod[a, M] + 1)]) 2 Pi/M, v, w, t] Cos[(a + 1 + s[Q (Mod[a, M] + 1)]) 2 Pi/M],      r[S, (a + 1 + s[Q (Mod[a, M] + 1)]) 2 Pi/M, v, w, t] Sin[(a + 1 + s[Q (Mod[a, M] + 1)]) 2 Pi/M]}},    {a, 1, M, 1}]]}Manipulate[ Graphics[  Table[   Translate[    Reverse@     Table[      F[i*j, (1 + .3 i^1.7), 125 + 25 i,          3 + Round[9 s[i*j]], 3 + Round[9 s[2 i*j]],        .6, t + s[j] 2 Pi],      {i, 1, 4, 1}],    {17*s[j], 23.8*s[2 j]}],   {j, 1, 46, 1}],  PlotRange -> {{.5, 17.5}, {-1.2, 22.6}},   ImageSize -> {500, 700}], {t, 0, 2Pi}]
Filed under: #GIF  #Mathematica  #Vasilj Godzh

1. unhallowed-fox reblogged this from unhallowed-fox
2. wisdomisaround reblogged this from intothecontinuum
3. nabala reblogged this from regrubg
4. sesquipedalianexcess reblogged this from intothecontinuum
5. justarandomone reblogged this from porcelainspine
6. thankyoufornothingg reblogged this from porcelainspine
7. f-luttery reblogged this from porcelainspine
8. fearorfire reblogged this from porcelainspine
9. porcelainspine reblogged this from intothecontinuum
10. smugdadaist reblogged this from buddhabrot
11. echelon4l reblogged this from mandolinaes
12. jeanderoche reblogged this from intothecontinuum
13. suchisasami reblogged this from intothecontinuum
14. savagexa reblogged this from intothecontinuum
15. leauchy reblogged this from demystifyme
16. clazzjassicalrockhop reblogged this from intothecontinuum
17. daark-side reblogged this from fernandopiltz
18. incondited-yoni reblogged this from soleius
19. soleius reblogged this from crackersaregreatwithamnesia
20. crackersaregreatwithamnesia reblogged this from klonopin-kids
21. sundegai2013 reblogged this from sundegai
22. seleniclunar reblogged this from dystopiabella
23. fantasminhabebe reblogged this from fugaz67
24. jpixiepoison reblogged this from fluorescentfunk
25. where-weve-been-is-who-we-are reblogged this from mechanicalbubble
26. mechanicalbubble reblogged this from serpenteatserpent
27. serpenteatserpent reblogged this from pachi-pachi
28. pachi-pachi reblogged this from neonexperience
29. jimmynewland reblogged this from intothecontinuum
30. gettingtwisted reblogged this from prxmethevn
31. tsukimadrigal reblogged this from dystopiabella
32. sebastianvi reblogged this from dystopiabella
33. gambita reblogged this from thevuas
34. kannibalking reblogged this from dystopiabella