Wolfram Language

Álgebra y teoría de números

Gráficas tortuga

AnglePath genera la lista de puntos en 2D obtenidos mediante la especificación de los desplazamientos relativos consecutivos desde el punto anterior. Esta lista corresponde a la ruta de gráficos tortuga del lenguaje de programación Logo.

Genere un simple gráfico tortuga.

In[1]:=
Click for copyable input
Graphics[Line[AnglePath[ConstantArray[110 \[Degree], 100]]]]
Out[1]=

Genere una curva de copo de nieve de Koch.

In[2]:=
Click for copyable input
Graphics[Line[AnglePath[Array[ThueMorse, 4096] 2 Pi/3]]]
Out[2]=

Genere una curva de dragón.

In[3]:=
Click for copyable input
Graphics[Line[ AnglePath[{90 \[Degree], -90 \[Degree]}[[ 1 + Nest[Join[#, {0}, Reverse[1 - #]] &, {0}, 10]]]]]]
Out[3]=

Genere otra curva interesante.

In[4]:=
Click for copyable input
Graphics[Line[AnglePath[N@Range[100000]]]]
Out[4]=

Ejemplos relacionados

de en fr ja ko pt-br ru zh