intothecontinuum: Mathematica code: G[X_, Y_, Z_, S_, p_, q_, r_, a_, b_, c_, N_, e_, t_, PR_, IS_] :=Graphics[ Table[ Disk[ {X*Cos[a (e*t + n)*2 Pi/N + p], Y*Cos[b (e*t + n)*2 Pi/N + q]}, Z*Cos[c (e*t + n)*2 Pi/N + r*t*2 Pi] + S], {n, 1,

intothecontinuum: ...

采集喜欢评论

查看来源 pinterest.com

内双眼皮小菇凉从苏三里

转采于2024-04-01 20:25:27

intothecontinuum: Mathematica code: G[X_, Y_, Z_, S_, p_, q_, r_, a_, b_, c_, N_, e_, t_, PR_, IS_] :=Graphics[ Table[ Disk[ {X*Cos[a (e*t + n)*2 Pi/N + p], Y*Cos[b (e*t + n)*2 Pi/N + q]}, Z*Cos[c (e*t + n)*2 Pi/N + r*t*2 Pi] + S], {n, 1,

内双眼皮小菇凉