▪ Όμορφα μοτίβα - 16

Mια προοπτική για τα μαθηματικά, το μοτίβο και το αφηρημένο.

Mathematica code:
Animate[
Graphics[
Line[
Table[{-.995^n*Sin[n*4.72185], .995^n*Cos[n*4.72185]}, {n, 0, 2000}]],
PlotRange -> p],
{p, .04, .09, .01}]