level 1
jyg_1
楼主
Clear["`*"];
Clear[x, y];
v0 = 1400;
\[Theta] = 0.4 Pi;
days = 3600*24;
G0 = 6.672*^-11;
Mjupter = 1.9*^27;
Vjupter = 13070;
r = {Vjupter (t - 12 days) - x[t], -y[t]};
DSolve[{{x''[t], y''[t]} == (G0 Mjupter r)/Norm[r]^3, {x'[0],
y'[0]} == {Cos[\[Theta]], Sin[\[Theta]]} v0, {x[0],
y[0]} == {x0, -v0 12 days}}, x[t], y[t], t]
2022年06月23日 11点06分
1
Clear[x, y];
v0 = 1400;
\[Theta] = 0.4 Pi;
days = 3600*24;
G0 = 6.672*^-11;
Mjupter = 1.9*^27;
Vjupter = 13070;
r = {Vjupter (t - 12 days) - x[t], -y[t]};
DSolve[{{x''[t], y''[t]} == (G0 Mjupter r)/Norm[r]^3, {x'[0],
y'[0]} == {Cos[\[Theta]], Sin[\[Theta]]} v0, {x[0],
y[0]} == {x0, -v0 12 days}}, x[t], y[t], t]
![[泪]](/static/emoticons/u6cea.png)
属于是手抖眼又不好使