"People get stuck, thinking they are one kind of person, but they aren’t … The human body essentially recreates itself every six months. Nearly every cell of hair and skin and bone dies and another is directed to its former place. You are not who you were in February.”
- from A Million Miles in a Thousand Years by Donald Miller
![circles moving in circles
Mathematica code:
Circles[color_, X_, Y_, s_, r_, IS_] := Graphics[ Table[ {color, Disk[{x, y} + s, r]}, {x, -X, X}, {y, -Y, Y}], ImageSize -> IS]W[x_, y_, w_, a_, t_] := w ((Cos[a] + Sin[a]) x + (Sin[a] - Cos[a]) y) + t*2 PiManipulate[ Show[ Circles[Black, X, Y, 0, r, 500], Circles[White, X, Y, .25 r*{Cos[W[x, y, w, a, t]], Sin[W[x, y, w, a, t]]}, r/2, 500] ],{X, 10, 100, 1}, {Y, 10, 100, 1},{{r, .5}, .1, 1}, {{w, 1}, 0, 1}, {a, 0, 2 Pi},{t, 0, 1}]Manipulate[ Show[ Circles[Black, 10, 10, 0, .6+ .2Cos[t*2Pi/4], 500], Circles[White, 10, 10, .25 (.6+ .2Cos[t*2Pi/4])*{Cos[W[x, y, .75, 3Pi/2, t]], Sin[W[x, y, .75, 3Pi/2, t]]}, (.6+ .2Cos[t*2Pi/4])/2, 500] ],{t, 0, 4}]](https://24.media.tumblr.com/tumblr_mcsnjgOWVC1qfjvexo1_500.gif)
