好久不见，大家好，想问下如何旋转3D区域？比如官网这里有一个例子
https://www.wolfram.com/language/11/3d-printing/algorithmically-generate-3d-models.html?product=mathematica
比如生成了这样一个区域的例子
如何旋转它半圈，看起来就像一个半球，中间是一个立体的空心的Pi？

img = ...
DiscretizeRegion@RegionIntersection[Region@Ball[],ImplicitRegion[z<0,{x,y,z}]]
ImageMesh[DeleteSmallComponents[Binarize[img, 0.9], 500],DataRange->{-1,1}]
RegionProduct[%, Line[{{0.}, {-0.2}}]]
RegionDifference[%%%,%]

LZ在SE也问了，姑且有个答案，不过没彻底解决：
mathematica.stackexchange.com/q/230725/1871
mathematica.stackexchange.com/q/230835/1871