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/07/11 00:50:02
xS[OA+blal˓SHSj
VJH{HkB!\`5P33[(Ɛ&|9|s64ޛ^'5*N/iUHfnլUX*ћ#2[ u"YjPx"w=?9jInU_5z{#}c贪<'2h*6
߇x}#)
.)FxayHK