In[]:=
CSGRegion["Difference",{Cylinder[{{-9,0,0},{9,0,0}},7],ExampleData[{"Geometry3D","SpaceShuttle"},"Region"]}]
CSGRegion
:目前还不支持区域
.
Out[]=
CSGRegionDifference,Cylinder[{{-9,0,0},{9,0,0}},7],

In[]:=
Ω=RegionDifference[Cylinder[{{-9,0,0},{9,0,0}},7],ExampleData[{"Geometry3D","SpaceShuttle"},"Region"]];​​Region[Ω]
Out[]=
Region
Embedding dimension: 3

In[]:=
mesh=ToElementMesh[Ω,MaxCellMeasure0.001];
In[]:=
mr=MeshRegion[MeshOrderAlteration[mesh,1]];​​hmr=HighlightMesh[RegionBoundary[mr],Sequence[Style[{2,All},Opacity[0.25]]]]
HighlightMesh
:HighlightMeshRegionBoundaryMeshRegionMeshOrderAlterationToElementMeshBooleanRegionAnd[2]&,Cylinder[2],
,MaxCellMeasure0.001,1,{2,All} 的位置 1 上应该是有效的 MeshRegion 或 BoundaryMeshRegion 对象.
Out[]=
HighlightMeshRegionBoundaryMeshRegionMeshOrderAlterationToElementMeshBooleanRegion#1&&!#2&,Cylinder[{{-9,0,0},{9,0,0}},7],
,MaxCellMeasure0.001,1,{2,All}
TheoutputoftheaboveRegionDifferenceiswrong.Whatiswrong?Pleaseenlightenme.thankyou！