三个半径相同的圆柱体两两垂直相交，怎么用mathematica画出三立体相交部分，并把面标注颜色，求大神！！！

Question

三个圆柱体的方程分别为x^2+y^2=1,x^2+z^2=1,y^2+z^2=1。请写代码。。。谢谢。。。

Answer 1

这个很容易啊：

RegionPlot3D[ x^2 + y^2 <= 1 && x^2 + z^2 <= 1 && y^2 + z^2 <= 1, {x, -1, 1}, {y, -1, 1}, {z, -1, 1}]

啊，不过我为什么要来答这个问题呢，楼主显然已经抛弃了他的问题，一个不合要求的答案也已经被选成了推荐，我这不是自降采纳率吗……

Answer 2

ContourPlot3D[{x^2 + y^2 == 1, x^2 + z^2 == 1,
y^2 + z^2 == 1}, {x, -1, 1}, {y, -1, 1}, {z, -1, 1}]追问

不行呀，这个画出来是两个圆柱相交，我想要的是三个圆柱相交的那个多面体

本回答被网友采纳

Answer 3

三立体相交于8个点

Answer 4

兄弟，我也在纠结这个问题，解决了吗、、、、、