趣题:你能想到圆环的截面有哪几种解吗
起因是“数学文化”的一条微博,一个标准的圆环被一个平面所截,截面有可能是什么图形呢?其中有一种特殊情况很难想象,是两个相交的圆,我的想象力实在是不够......
于是乎,自己必须验证一下这种情况,确实很有意思
好人做到底,上代码
Export["d:/d.gif", Table[ ContourPlot3D[{(18 + x^2 + y^2 + z^2)^2 == 80 (x^2 + y^2)},{x, -8, 8}, {y, -8, 8}, {z, -6, 6}, ColorFunction -> Function[{x, y, z, f}, ColorData["Rainbow"][z]], PlotPoints -> 50, ClipPlanes -> {a, 0, -4, 0}, ClipPlanesStyle -> {Directive[Opacity[.4], RGBColor[.9, .4, 0]]}, Mesh -> None], {a, -3, 2, .05}]]