作业帮 > 数学 > 作业

mathematica 解复杂的四元微分方程组

来源:学生作业帮 编辑:拍题作业网作业帮 分类:数学作业 时间:2024/05/16 02:17:20
mathematica 解复杂的四元微分方程组
NDsolve[{y1[x]*y2'[x] + y2[x]*y1'[x] == 0,
3200*y1[x]*y2[x]*y3[x] == 0.075*y3'[x] + 4/3*25*10^-6*y2[x]*y2'[x],
y1[x]*y2[x]*y2[x] == -y4[x] + 4/3*25*10^-6*y2'[x],
y4[x] == y1[x]*461.76*y3[x],y1[0] == 67.99,
y2[0] == 50,y3[0] == 811,y4[0] == 22.99*10^6},{y1[x],y2[x],
y3[x],y4[x]},{x,0,1}]
函数名写错了,应该是 NDSolve