Question

Mathematica绘制三维图片问题

ContourPlot3D[{(x^2 + (9 y^2)/4 + z^2 - 1)^3 - X^2 z^3 - (9 y^2 z^3)/
80 == 0}, {x, -3, 3}, {y, -3, 3}, {z, -3, 3}]这句话对吗？？求回答！！

Answer 1

Mathematica是区分大小写的，你的语句里有一个小x写成了大X，要改回来：

ContourPlot3D[{(x^2 + (9 y^2)/4 + z^2 - 1)^3 - x^2 z^3 - (9 y^2 z^3)/80 == 0}, {x, -3, 3}, {y, -3, 3}, {z, -3, 3}]

这样就能画了：

Answer 2

ContourPlot3D[{(x^2 + (9 y^2)/4 + z^2 - 1)^3 - X^2 z^3 - (9 y^2 z^3)/
80 == 0}, {x, -3, 3}, {y, -3, 3}, {z, -3, 3}] 最后结果是这样。