Visualize propriedades de malha 

Usando o HighlightMesh, propriedades de malha podem ser facilmente visualizadas.

mostre o input completo de Wolfram Languageoculte o input

In[1]:=

X mesh2d = DelaunayMesh[RandomReal[1, {200, 2}]]

Out[1]=

Escureça cada face de acordo com sua área.

mostre o input completo de Wolfram Languageoculte o input

In[2]:=

X {minArea, maxArea} = {Min[#], Max[#]} &@ PropertyValue[{mesh2d, 2}, MeshCellMeasure]; Legended[HighlightMesh[mesh2d, Style @@@ ({{2, #}, ColorData["SunsetColors"][ Rescale[PropertyValue[{mesh2d, {2, #}}, MeshCellMeasure], {minArea, maxArea}]]} & /@ Range[MeshCellCount[mesh2d, 2]])], BarLegend[{"SunsetColors", {minArea, maxArea}}]]

Out[2]=

Escureça cada face de acordo com sua qualidade.

mostre o input completo de Wolfram Languageoculte o input

In[3]:=

X {minQual, maxQual} = {Min[#], Max[#]} &@ PropertyValue[{mesh2d, 2}, MeshCellQuality]; Legended[HighlightMesh[mesh2d, Style @@@ ({{2, #}, ColorData["SunsetColors"][ Rescale[PropertyValue[{mesh2d, {2, #}}, MeshCellQuality], {minQual, maxQual}]]} & /@ Range[MeshCellCount[mesh2d, 2]])], BarLegend[{"SunsetColors", {minQual, maxQual}}]]

Out[3]=