터틀 그래픽
AnglePath는 직전의 점에서 지속적인 상대적 위치를 지정함으로써 얻을 수 있는 2D 점 목록을 생성합니다. 이 목록은 Logo 프로그래밍 언어의 터틀 그래픽 경로에 해당합니다.
간단한 터틀 그래픽을 생성합니다.
In[1]:=
Graphics[Line[AnglePath[ConstantArray[110 \[Degree], 100]]]]
Out[1]=
코흐 (Koch) 눈송이 곡선을 생성합니다.
In[2]:=
Graphics[Line[AnglePath[Array[ThueMorse, 4096] 2 Pi/3]]]
Out[2]=
드래곤 커브를 생성합니다.
In[3]:=
Graphics[Line[
AnglePath[{90 \[Degree], -90 \[Degree]}[[
1 + Nest[Join[#, {0}, Reverse[1 - #]] &, {0}, 10]]]]]]
Out[3]=
또 하나의 재미있는 곡선을 생성합니다.
In[4]:=
Graphics[Line[AnglePath[N@Range[100000]]]]
Out[4]=