mathematica求解微分方程的数值解,做出图像,R = 0.008;Y = 47*2*3.14;z = 0.18;m = 0.14;k = 20;g = 10;f = 20;i = 0.143;e = 28;NDSolve[{0.5*m*(R^4 *y[t]^2 *y'[t]^2)/(R*Y^2 + z^2 - R*y[t]^2) + 0.5*i*y'[t]^2 + 0.5*k*(R*Y^2 + z^2 - R*y[t]^2) + 0

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/06 04:41:13
mathematica求解微分方程的数值解,做出图像,R = 0.008;Y = 47*2*3.14;z = 0.18;m = 0.14;k = 20;g = 10;f = 20;i = 0.143;e = 28;NDSolve[{0.5*m*(R^4 *y[t]^2 *y'[t]^2)/(R*Y^2 + z^2 - R*y[t]^2) + 0.5*i*y'[t]^2 + 0.5*k*(R*Y^2 + z^2 - R*y[t]^2) + 0

mathematica求解微分方程的数值解,做出图像,R = 0.008;Y = 47*2*3.14;z = 0.18;m = 0.14;k = 20;g = 10;f = 20;i = 0.143;e = 28;NDSolve[{0.5*m*(R^4 *y[t]^2 *y'[t]^2)/(R*Y^2 + z^2 - R*y[t]^2) + 0.5*i*y'[t]^2 + 0.5*k*(R*Y^2 + z^2 - R*y[t]^2) + 0
mathematica求解微分方程的数值解,做出图像,
R = 0.008;
Y = 47*2*3.14;
z = 0.18;
m = 0.14;
k = 20;
g = 10;
f = 20;
i = 0.143;
e = 28;
NDSolve[{0.5*m*(R^4 *y[t]^2 *y'[t]^2)/(R*Y^2 + z^2 - R*y[t]^2) +
0.5*i*y'[t]^2 + 0.5*k*(R*Y^2 + z^2 - R*y[t]^2) + 0.5*k*z^2 -
k*z*Sqrt[R*Y^2 + z^2 - R*y[t]^2] + 0.5*f*(y[t] - Y)^2 -
m*g*(Sqrt[R*Y^2 + z^2 - R*y[t]^2] - z) == e,y[0] == 0,
y'[0] == 1},y[t],{t,10}];
Plot[Evaluate[y[t] /.%],{t,0,10}]
这是代码,我用的mathematica 8 看不出错误来.

mathematica求解微分方程的数值解,做出图像,R = 0.008;Y = 47*2*3.14;z = 0.18;m = 0.14;k = 20;g = 10;f = 20;i = 0.143;e = 28;NDSolve[{0.5*m*(R^4 *y[t]^2 *y'[t]^2)/(R*Y^2 + z^2 - R*y[t]^2) + 0.5*i*y'[t]^2 + 0.5*k*(R*Y^2 + z^2 - R*y[t]^2) + 0
NDSolve里的语法错了,是{t,0,10}而不是{t,10};另外对于常微分方程,所需的边界条件数目,为它的最高阶导数的阶数,并且边界的导数阶数要小于方程的阶数.也就是说你这里的条件多了一个,把那个y'[0]==1去掉,并且,你这里的边界给的不合理,所以在计算开始不久就耗尽了全部的积分步长.试了一下也没找到合理的边界条件,你自己试试吧.

常微分方程初值问题的数值求解方法 用mathematica求解如下二阶微分方程的数值解 输出最终的数值解并画图用mathematica求解如下二阶微分方程的数值解和画图的程序代码A*y (x) = y'' (x)/{{1 + [y' (x)]^2}^(3/2)} + y' (x)/{{1 + [y' (x)]^2}^(1/2)}其 在mathematica怎样数值求解带有积分的微分方程并画图如微分方程,y'[t]=-Integrate[y[t']*Exp[t-t'],{t',0,t}],其中t的范围0到10,y[0]=1。 在mathematica 中如何求解偏微分方程 mathematica 微分方程数值解的引用我解出了微分方程的数值解,想画出这个数值解得积分,怎么办?不行,,,ganwei1989的答案还是不行.... 请用Matlab求解下面二阶常微分方程的数值解 求大神帮忙用matlab求解微分方程的数值解 用mathematica如何求解标量场的Hessian矩阵,数值差分 Mathematica求解三元二阶偏微分方程组Mathematica里面说DSOLVE只能求解二元的偏微分不知道有哪位大大知道Mathematica可以求解三元的偏微分方程么? mathematica中不能正确求解微分方程,在Mathematica中就不能计算出和帮助文档一样的结果,为什么?帮助文档给出的正确答案是 mathematica解微分方程组求解微分方程的命令,要求写成dy,dx那种形式,不要y',y''型的 matlab如何对偏微分方程求解的数值解进行积分 英语翻译 “以微分方程为基础的方法对控制方程进行数值求解.” 求解高数题.微分方程的 求解微分方程的通解 mathematica求解 微分方程的数值解是什么意思? mathematica 画微分方程数值解求y'(t)=y^2+t^2,y(0)=0的解的图像!