Seems like we could use a nice spot to post results we like, so I'll start with this one by Edmund Harriss (@Gelada):
http://t.co/hmj9Vr1DhY
TWEET by Valtteri Raiko ?@vjraik
a=0;v={{0,0}};d[x_]:=(v=Append[v,v[[-1]]+{Cos[a],Sin[a]}];a+=x Pi/2); d/@ Flatten[Nest[#/.(0->{0,0,1})&,0,11]];ListPlot[v]
A TWEET by Andrej Bauer ?@andrejbauer
Graphics[Table[{PointSize[2^-n/4],Hue[n/50], (Point[{Re@x,Im@x}]/.NSolve[#,x])&/@(x^Range[0,n].#&/@Tuples[{1,2},n+1])},{n,1,11}]]
A few of my favorites:
https://twitter.com/woodylewis/status/512763729922887681 https://twitter.com/wolframtap/status/513086262702796800 https://twitter.com/wolframtap/status/513098198261710848 https://twitter.com/wolframtap/status/513103361613516800 https://twitter.com/wolframtap/status/513126085580836864
One: