Question

Mathematica 解含参微分方程组等问题

下列丙个题要求写出在mathematica中的操作步骤(仅能做出第一个也可以！)：
1.求方程组dx/dt=y+1,dy/dt=x+1在x(0)=-2,y(0)=0时的特解。
2.画出一维线性谐振子n=50的几率分布图，并与经典谐振子位置几率分布比较。
不胜感激！

Answer 1

1. 先求通解,由dx/dt=y+1,dy/dt=x+1,得到 dy/dx=(x+1)/(y+1), 见下面的连接.