Turtle-Graphik
AnglePath generiert die Liste von zweidimensionalen Punkten, die sich durch die Bewegung vom jeweils vorangegangenen Punkt ergeben. Diese Liste entspricht dem Pfad der Turtle-Graphik der Programmiersprache LOGO.
Generieren Sie eine einfache Turtle-Graphik.
In[1]:=
Graphics[Line[AnglePath[ConstantArray[110 \[Degree], 100]]]]
Out[1]=
Generieren Sie eine Koch-Kurve.
In[2]:=
Graphics[Line[AnglePath[Array[ThueMorse, 4096] 2 Pi/3]]]
Out[2]=
Generieren Sie eine Kurve in Form eines Drachens.
In[3]:=
Graphics[Line[
AnglePath[{90 \[Degree], -90 \[Degree]}[[
1 + Nest[Join[#, {0}, Reverse[1 - #]] &, {0}, 10]]]]]]
Out[3]=
Generieren Sie eine weitere Kurve mit interessanter Form.
In[4]:=
Graphics[Line[AnglePath[N@Range[100000]]]]
Out[4]=