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

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

Mathematica code:

Animate[
Graphics[
Table[
Circle[{0, i}, t + (16 - n) (1 + Sign[16 - n])/2],
{n, 0, 100, 1}, {i, -5, 5,1}],
PlotRange -> 6],
{t, 0, 1, .01}]