有没有大神可以帮忙看一下这个mathematica程序,想把一系列曲线画在同一个图中.程序如下c=0.01;a=5;While[c

来源:学生作业帮助网 编辑:作业帮 时间:2024/10/04 01:52:53
有没有大神可以帮忙看一下这个mathematica程序,想把一系列曲线画在同一个图中.程序如下c=0.01;a=5;While[c
x͒JA_e/զ՛^ 0bYa]sM7E4?-JSEq}=3>F ϜsFHqi#Bmh{?òI:US/zul`ObQLU>J֐ ْՅ;aOG:%/6x"**B$=-0'/p🜢SF/9; YqG|n&5 P5ѵ 511kL>쓘uF8ׯcc7ױ rG> yGH yƳޢ$pc@.uoPjN z sAk25Yk_ epݠQVSD+3t[8[+p Z

有没有大神可以帮忙看一下这个mathematica程序,想把一系列曲线画在同一个图中.程序如下c=0.01;a=5;While[c
有没有大神可以帮忙看一下这个mathematica程序,想把一系列曲线画在同一个图中.程序如下
c=0.01;
a=5;
While[
c

有没有大神可以帮忙看一下这个mathematica程序,想把一系列曲线画在同一个图中.程序如下c=0.01;a=5;While[c
这样就可以了
a=5;
Show[Table[
ContourPlot[(3*Sqrt[x^2 + z^2] - a^2/(Sqrt[x^2 + z^2]))*
x^2/(x^2 + z^2) == c,{x,0,20},{z,0,20}],{c,0.01,1,
0.1}]]
mathematica做循环的时候最好使用table,少用while.
把很多个图放在一起,用show函数.