利用Mathematica软件,求解微分方程初值问题。
利用Mathematica软件,求解微分方程初值问题,y''[x]+Sin[x]^2y'[x]+y[x]=Cos[x]^2,y[0]=1,y'[0]=0的数值解并绘制方程...
利用Mathematica软件,求解微分方程初值问题,y''[x]+Sin[x]^2 y'[x]+y[x]=Cos[x]^2,y[0]=1,y'[0]=0的数值解并绘制方程解的图形。求数值解应该是利用NDSolve函数,下面的编写求解语句是什么,我写了很多次,结果都出现了错误。感谢。
展开
1个回答
2013-07-08
展开全部
解方程:
s = NDSolve[{y''[x] + Sin[x]^2 y'[x] + y[x] == Cos[x]^2, y[0] == 1, <br/> y'[0] == 0}, y, {x, -10, 10}]
绘图:
Plot[Evaluate[y[x] /. s], {x, -5, 5}, PlotRange -> All]
s = NDSolve[{y''[x] + Sin[x]^2 y'[x] + y[x] == Cos[x]^2, y[0] == 1, <br/> y'[0] == 0}, y, {x, -10, 10}]
绘图:
Plot[Evaluate[y[x] /. s], {x, -5, 5}, PlotRange -> All]
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询