Mallas de Delaunay 

Cree una malla de Delaunay a partir de un conjunto de puntos.

In[1]:=

X DelaunayMesh[RandomReal[1, {20, 2}]]

Out[1]=

Lo mismo se puede hacer en 1D o 3D.

In[2]:=

X DelaunayMesh[RandomReal[1, {10, 1}]]

Out[2]=

In[3]:=

X DelaunayMesh[RandomReal[1, {30, 3}]]

Out[3]=

Una malla de Delaunay se define por la propiedad de que para cada triángulo, el círculo circunscrito del triángulo no contiene ninguno de los otros puntos de entrada de malla.

muestre la entrada completa de Wolfram Languageoculte la entrada

In[4]:=

X SeedRandom[1234]; \[ScriptCapitalR] = DelaunayMesh[RandomReal[1, {8, 2}]]; circles = Circumsphere @@@ Normal@GraphicsComplex[MeshCoordinates[\[ScriptCapitalR]], MeshCells[\[ScriptCapitalR], 2]]; Show[HighlightMesh[\[ScriptCapitalR], {Style[0, Directive[PointSize[Large], Red]], Style[1, Gray], Style[2, LightGray]}], Graphics[{Orange, circles}], PlotRange -> {{0, 1}, {0, 1}}]

Out[4]=