It started as this:
for (i in 1:500)
{
x = x*((0.98)^i)*cos(i)
y = y*((0.98)^i)*sin(i)
}
which is simple R code that generates 500 x, y points that spiral. That code gave me this:
Next, I replaced the dots with line segments. This looks much different.
Finally, I ran an image processing script over it. The short version is that the script connects dots with a series of lines. That script spit this image out, which I love: