- #1

- 1,868

- 0

I am trying to solve Newtons equation for a particle in (x, y, z) using NDsolve. Here I what I have so far:

Code:

```
sol = NDSolve[{
x''[t] == acceleration[x'[t], y[t], z[t]],
y''[t] == acceleration[y'[t], x[t], z[t]],
z''[t] == 0,
x[0] == 2, x'[0] == 0, y[0] == 0, y'[0] == 0, z[0] == 0,
z'[0] == 250},
{x[t], y[t], z[t]}, {t, 0, 1}];
ParametricPlot[{x[t], x'[t]} /. sol, {t, 0, 0.001}, PlotRange -> {{0, 0.35}, {0, 5}}, AspectRatio -> 0.75]
```

Is my use of NDsolve correct?

Best,

Niles.