谁能帮我用mathematica 8.0画个图

谁能帮我用mathematica 8.0画个图
Plot3D[E^((1 - x^2)*(1 - y^2)),{x,-20,20},{y,-20,20}]
函数就是这个
电脑运行很慢
ufftei 1年前 已收到1个回答 举报

ie3uj9 幼苗

共回答了19个问题采纳率:94.7% 举报

Plot3D[E^((1 - x^2)*(1 - y^2)), {x, -2, 2}, {y, -2, 2}]
这就够了, E^(399*399) = 1.3056100354725212070692 * 10 ^ 69140
你要它怎么计算,画出图来也变形了,看不出规律来.

1年前 追问

1

ufftei 举报

哦,那我用这个-2.2的定义域,四边有点变形(向下凹),是不是因为定义域的问题?

举报 ie3uj9

E^9 = 8103.083927575384 你的图中, z 的范围没有这么大。 Plot3D[E^((1 - x^2)*(1 - y^2)), {x, -2, 2}, {y, -2, 2},PlotRange -> All] 就更看不出特点了。 在 x=2, -2

ufftei 举报

我认为这图应该是像是把一个小球放在橡皮膜上,弯曲的样子的,四边应该是比较“平坦”的,中间凹陷,能否加个q,很多关于mathematica8.0的我不会用,谢谢 973926198

举报 ie3uj9

z = E^((1 - x^2)*(1 - y^2)) 在(0,0) 取得极大值,……

ufftei 举报

那在周围
可能相似的问题
Copyright © 2024 YULUCN.COM - 雨露学习互助 - 18 q. 0.069 s. - webmaster@yulucn.com