Styling Mesh Components 

Components of a mesh can be styled for illustrative purposes.

In[1]:=

X MeshRegion[{{0, 0}, {1, 0}, {0, 1}}, Polygon[{1, 2, 3}], MeshCellStyle -> {1 -> Red}]

Out[1]=

An already created mesh can be styled using HighlightMesh.

In[2]:=

X mesh2d = DelaunayMesh[RandomReal[1, {20, 2}]]; HighlightMesh[mesh2d, Style[{2, {1, 2, 3, 4, 5}}, Red]]

Out[2]=

By making the faces of a 3D mesh transparent, the internal structure is revealed.

In[3]:=

X HighlightMesh[DelaunayMesh[RandomReal[1, {10, 3}]], Style[2, Opacity[0.3]]]

Out[3]=

Color the faces of a polyhedron based on how many vertices they have.

show complete Wolfram Language inputhide input

In[4]:=

X ColoredPolyhedron[name_String] := Module[{faces}, faces = GatherBy[PolyhedronData[name, "FaceIndices"], Length[#] &]; BoundaryMeshRegion[PolyhedronData[name, "VertexCoordinates"], Table[Style[Polygon[faces[[i]]], ColorData[100, i]], {i, Length[faces]}]] ]

In[5]:=

X Grid[Partition[ ColoredPolyhedron /@ Take[PolyhedronData["Archimedean"], 12], 4]]

Out[5]=