December 2011
18 posts
Dec 30th
1 note
Dec 30th
1,946 notes
Dec 22nd
135 notes
Dec 21st
203 notes
Dec 21st
137 notes
Dec 21st
13 notes
Dec 17th
1 note
Dec 15th
5 notes
intothecontinuum: High-Res (750x750) Mathematica code: Animate[ Graphics[ Rotate[ Table[ Circle[{100*Cos[i*Pi/12], 100*Sin[i*Pi/12]},   t+(100 - n) (1 + Sign[100 - n])/2], {n, 0, 100, 1}, {i, 0, 23, 1}], t*Pi/12], PlotRange -> 20, ImageSize ->750], {t, 0, 1}]
Dec 14th
84 notes
Dec 14th
5,771 notes
Dec 12th
Dec 10th
130 notes
Dec 7th
233 notes
4 tags
Dec 7th
Dec 6th
189 notes
Dec 6th
7 notes
Dec 5th
22 notes
Dec 5th
517 notes