有谁会用mathematica软件做这个题？很有挑战性哦
有谁会用mathematica软件做这个题？急急急～～～:@L二次曲面的方程如下：x^2/a^2+y^2/b^2+z^2/c^2=d
要求用MATHEMATICA讨论参数a，b，c对其形状的影响，并画出其图形。 Maple 很容易做到，但是Mathematic就不知道了。 我想形状就是响应吧，a，b，c为参数，这样考虑那就是做偏导就可以了，分别求得x y z对参数偏导，可得影响。mathematica没接触过 呵呵 自己的想法，大家讨论 这不是椭球方程吗？
不过三维隐函数不知道用什么作图
[ 本帖最后由 suffer 于 2007-6-12 16:39 编辑 ] 这个问题是个标准的椭球，可以用参数方程来解决。
为了方便，假设你后面是d^2，下面给出a从1变到5对图形的影响：
a = 1;
b = 1;
c = 1;
d = 1;
(*fx = d*a*Sin*Cos;*)
fy = d*b*Sin*Sin;
fz = d*c*Cos;
For[a = 1, a ≤ 5,
fx = d*a*Sin*Cos;
fig = ParametricPlot3D[{fx, fy, fz}, {sita, 0, Pi}, {alpha, 0, 2*Pi}];
a++];
[ 本帖最后由 TurtleRock 于 2007-6-14 11:37 编辑 ] TurtleRock
是不是mathematica中没有三维隐含数的作图命令？ 原帖由 suffer 于 2007-6-15 09:08 发表 http://www.chinavib.com/forum/images/common/back.gif
TurtleRock
是不是mathematica中没有三维隐含数的作图命令？
在5.2版本中的确没有，但是在6.0版本中，这个问题得到了很好的解决。
6.0中不再使用ImplicitPlot，而是使用ContourPlot和CountourPlot3D
如：
ContourPlot3D[ x^3 + y^2 - z^2 == 0, {x, -2, 2}, {y, -2, 2}, {z, -2, 2}] 这根本就是傻瓜体，还谈什么挑战性:@o 装上6.0试了一下，感觉还不错
ContourPlot3D[ x^3 + y^2 - z^2 == 0, {x, -2, 2}, {y, -2, 2}, {z, -2, 2}]
回复 #1 huangyj1988 的帖子
在mathematica 6中很容易搞定.用的函数 是 manipulate
页:
[1]