Wolfram Language

Mehr Geometrie

Bounding-Regionen

In Version 11 können umgebende (Bounding) Regionen für Punkte und Gitternetze in allen Dimensionen erstellt werden zur graphischen Darstellung, aber auch für räumliche Abfragen oder räumliche Indexe.

In[1]:=
Click for copyable input
mesh = ExampleData[{"Geometry3D", "SpaceShuttle"}, "Region"]
Out[1]=

Ermitteln Sie die kleinste Kugel, die ein Gitternetz umgeben kann.

In[2]:=
Click for copyable input
BoundingRegion[mesh, "MinBall"]
Out[2]=

Stellen Sie das Gitternetz innerhalb unterschiedlicher umgebender Regionen dar.

Den kompletten Wolfram Language-Input zeigen
In[3]:=
Click for copyable input
showMeshGrid[mesh_, names_] := Grid[Partition[ Framed[Show[{mesh, Graphics3D[{Opacity[.5], BoundingRegion[mesh, #]}]}, PlotLabel -> #, PlotRange -> {{-8, 10}, {-8, 8}, {-6, 10}}, Method -> {"ShrinkWrap" -> False}], RoundingRadius -> 10, Background -> Lighter[Gray, 0.9], FrameMargins -> 10, FrameStyle -> GrayLevel[0.5]] & /@ names, 2, 2, 1]]
In[4]:=
Click for copyable input
showMeshGrid[mesh, {"MinCuboid", "MinBall", "FastCylinder", "FastCapsule"}]
Out[4]=

Verwandte Beispiele

en es fr ja ko pt-br ru zh