Animate[
   Graphics[
     Table[
       Circle[{30*Cos[i*Pi/4], 30*Sin[i*Pi/4]},
          t + (50 - n) (1 + Sign[50 - n])/2],
      {n, 0, 50, 1}, {i, 0, 7, 1}],
     PlotRange -> 12, ImageSize -> 500],
{t, 0, 1, .1}]

Source : (fuckyeahmath)

Artikel Terkait: