Wolfram言語™

境界領域

バージョン11は，表示，空間クエリ，空間インデックス追加のための，任意次元における点とメッシュの境界領域を提供する．

In[1]:=

mesh = ExampleData[{"Geometry3D", "SpaceShuttle"}, "Region"]

Out[1]=

メッシュを包み込む最小体積の球を求める．

In[2]:=

BoundingRegion[mesh, "MinBall"]

Out[2]=

さまざまな境界領域内のメッシュを示す．

In[3]:=

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]:=

showMeshGrid[mesh, {"MinCuboid", "MinBall", "FastCylinder", "FastCapsule"}]

Out[4]=