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

来源:学生作业帮助网 编辑:六六作业网 时间:2024/11/22 10:09:50
有没有大神可以帮忙看一下这个mathematica程序,想把一系列曲线画在同一个图中.程序如下c=0.01;a=5;While[c有没有大神可以帮忙看一下这个mathematica程序,想把一系列曲线

有没有大神可以帮忙看一下这个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函数.