>
TABOCAS NOTICIAS : Um caracol e seu guarda-chuva
sexta-feira, 1 de março de 2013
Um caracol e seu guarda-chuva
Nenhum comentário:
Postar um comentário
Postagem mais recente
Postagem mais antiga
Página inicial
Assinar:
Postar comentários (Atom)
![Inspired by Bridget Riley - Descending (1965)Mathematica code:WPlot[x_, y_, h_, k_, N_, R_, m_, s_, w_, v_, t_, px_, py_] := Graphics[ Table[ {AbsoluteThickness[k], Line[Table[{x*i + If[Mod[i, 2] == m, s*x*Sin[j*2 Pi/w + i*2 Pi/v + t], 0], (-1)^i*y + h*j}, {i, 1, N}]]}, {j, 1, R, 1}], PlotRange -> {{x + px, N*x - px}, {h - y + py, R*h - y}}, ImageSize -> {500, 700} ]P={1, 0.5, 0.4, 4, 19, 66, 0, 0.5, 0.99, 0.94, 2.12749, 0., 0.644}Manipulate[ WPlot[P[[1]], P[[2]], P[[3]], P[[4]], P[[5]], P[[6]], P[[7]], P[[8]], P[[9]], P[[10]], t, P[[12]], P[[13]]],{t, 0, 2 Pi}]](https://lh3.googleusercontent.com/blogger_img_proxy/AEn0k_tpdBCkt_3p9Aut-O-Bw5pxMbIGJVRh3IMe5QS7FOoyhq_mNy71pxzTb4IJlGdxsZuQnSiDnsrZuqSOuCUSm6yjmcgb5LZ96iw65n4KneGOpUUL-QOLkUdrZ-zVFmDxMTWa2eUsmBkEVG_FFQn2J4T48r6ozQBf6ghX4IGcUXNOYbU=s0-d)
Nenhum comentário:
Postar um comentário