Core Geometry

Mesh from Data

Version 11 provides direct access to a large volume of curated 3D geometric models such as polyhedra, knots, anatomical structures, and geometric features, specially organized and created for the Wolfram Language.

PolyhedronData.

show complete Wolfram Language input
In[1]:=
Click for copyable input
showMeshGrid[f_, names_] := Grid[{Framed[ Show[ImagePad[ Rasterize[ If[f === GeoElevationData, f[#, Automatic, "Region"], f[#, "Region"]], "Image", ImageSize -> {100, 100}, Background -> None], 10, RGBColor[1, 1, 1, 0]], PlotLabel -> format[#], Method -> {"ShrinkWrap" -> False}, ImageSize -> 100], RoundingRadius -> 10, Background -> Lighter[Gray, 0.9], FrameStyle -> GrayLevel[0.5]] & /@ names}] format[GeoDisk[s_, ___]] := format[s] format[e_Entity] := First[StringSplit[CommonName[e], ","]] format[s_] := s
In[2]:=
Click for copyable input
showMeshGrid[PolyhedronData, {"Dodecahedron", "SnubCube", "Echidnahedron", "CumulatedCube"}]
Out[2]=

KnotData.

In[3]:=
Click for copyable input
showMeshGrid[KnotData, {"Trefoil", "FigureEight", "SolomonSeal", "Stevedore"}]
Out[3]=

ChemicalData.

In[4]:=
Click for copyable input
showMeshGrid[ChemicalData, {"Water", "Caffeine", "SulfuricAcid", "DTyrosine"}]
Out[4]=

AnatomyData.

In[5]:=
Click for copyable input
showMeshGrid[AnatomyData, {"Liver", "Eye", "LeftHand", "Skull"}]
Out[5]=

GeoElevationData.

In[6]:=
Click for copyable input
showMeshGrid[GeoElevationData, {Entity["Mountain", "MountEverest"], Entity["Country", "Switzerland"], Entity["AdministrativeDivision", {"Hawaii", "UnitedStates"}], GeoDisk[Entity["UnderseaFeature", "MarianaTrench"], Quantity[30, "Miles"]]}]
Out[6]=

Related Examples

de es fr ja ko pt-br ru zh