Tortue graphique

AnglePath génère la liste des points en 2D obtenus en spécifiant des déplacements relatifs consécutifs à partir du point précédent. Cette liste correspond au chemin de tortue graphique du langage de programmation Logo.

Générez une simple tortue graphique.

In[1]:=

Graphics[Line[AnglePath[ConstantArray[110 \[Degree], 100]]]]

Out[1]=

Générez une courbe de flocon de neige de Koch.

In[2]:=

Graphics[Line[AnglePath[Array[ThueMorse, 4096] 2 Pi/3]]]

Out[2]=

Générez une courbe de dragon.

In[3]:=

Graphics[Line[ AnglePath[{90 \[Degree], -90 \[Degree]}[[ 1 + Nest[Join[#, {0}, Reverse[1 - #]] &, {0}, 10]]]]]]

Out[3]=

Générez une autre courbe intéressante.

In[4]:=

Graphics[Line[AnglePath[N@Range[100000]]]]

Out[4]=