如何用Mathematica作空间曲面方程:(x-b)^2+y^2=b^2

问题描述:

如何用Mathematica作空间曲面方程:(x-b)^2+y^2=b^2

Manipulate[ Plot3D[(x - b)^2 + y^2 == b^2, {x, -100, 100}, {y, -100, 100}], {b, -100, 100}]原方程是个柱面,用Plot3D好像不行啊Manipulate[ Plot3D[(x - b)^2 + y^2 == b^2, {x, -100, 100}, {y, -100, 100}], {b, -100, 100}] 的结果是一个不闭合曲面!你的题意写全了没有?Plot3D一样可以画柱面