作业帮 > 数学 > 作业

Mathematica如何画微分方程的斜率场图,并且画上在指定点的解曲线.

来源:学生作业帮 编辑:神马作文网作业帮 分类:数学作业 时间:2024/11/14 04:20:21
Mathematica如何画微分方程的斜率场图,并且画上在指定点的解曲线.
Mathematica如何画微分方程的斜率场图,并且画上在指定点的解曲线.
……你这问题也太过笼统了,能不能具体一些?
再问: 比如,我要画微分方程y'=(xy)/(x^2+4)的斜率场,并画上在过定点(0,-6)的解曲线。
再答: ……我本来是想和你确认下斜率场的概念的。刚查了下,嗯,和我猜的差不多。看了下帮助,mma其实有个画向量场的指令,VectorPlot,那么只要在这基础上变通下,就可以了: l=Sqrt[x^2+(x (x y)/(x^2 + 4))^2](*VectorPlot画出来的箭头有长度,所以这里用l把箭头弄成了一样长。此外注意,第二项的x是必须的。*) a = VectorPlot[{x/l, x (x y)/(x^2 + 4)/l}, {x, -2, 2}, {y, -8, -6}] 要画解曲线的话,那就得把原方程给解出来: b=DSolve[{y'[x] == (x y[x])/(x^2 + 4), y[0] == -6}, y[x], x] 再就是画图了,画到一起: c = Plot[y[x] /. b, {x, -2, 2}] Show[a, c]
再问: 不了解VectorPlot这个函数,请问l讲箭头变得一样长的原理是什么?谢谢!
再答: 强烈建议弄个中文版8.0.4,自带帮助文档超强悍。因为VectorPlot这个函数画出来的箭头,其长度等于该点的向量的模长。我这里绘图的原理其实是在每个点上画了这么一个向量:(x,xy'),很明显这个向量的方向就和斜率场里的短线方向一样,但是我看了一下,斜率场的短线都是一样长的,但是这个向量很明显不是,所以我就把它除了个向量本身的长度、单位化了。