Thank you, your dragon is great :)
- another post of yours has been selected for the Staff Picks group, congratulations !
We are happy to see you at the tops of the "Featured Contributor" board. Thank you for your wonderful contributions, and please keep them coming!
I am posting this for our China friends - exceptionally graceful code:
i = 0; Dynamic@Graphics@Line@AnglePath[KroneckerSymbol[-1, Range[++i]] Pi/2]
Exceptionally compact and elegant!
A variant that eventually fills all of 2D space:
i=0; Dynamic@Graphics@ Table[Rotate[Line@AnglePath[KroneckerSymbol[-1,Range[i++]] Pi/2],j Pi/2,{-1,0}],{j,0,3}]
Chris
Brilliant Vitaliy, I could watch this all day.
I see video. Very cool.
Thanks! I was planning to embed this YouTube video: https://www.youtube.com/watch?v=ug9fhgy9N60
But I couldn't (or don't know how to). So I added some GIF animations to give you the idea.
@Vitaliy Kaurov I can't seem to embed videos, is it possible?
No, no embedding yet, but we are working on that. Nice post, @Sander Huisman, beautiful animations !