Thanks so much everyone!
I think I've mostly figured it out. Turns out there is a very applicable example in the mathematica database. But I rerused it and modified it sort of.
s = NDSolve[{y''[x] + 10*Sin[y[x]] == 0, y[0] == 1, y'[0] == 0},
y, {x, 0, 30}]
and then...
Homework Statement
Graph in Mathematica to solve d^2theta/dt^2 + g/lsin(theta)= 0
Show a graph of period vs. Theta not.
Homework Equations
The Attempt at a Solution
I am not very experienced with entering information into mathematica. I am aware that the manipulate plot...
I managed to figure out, after drawing a simple diagram (of course!), that h in the potential equation has got to be equal to L-Lcos(theta). Also, the velocity is going to be equal to L(dtheta/dt), the length multiplied by the rate of change of the center angle. Knowing this,
k= 1/2 m...
Homework Statement
A)Show that for a non-frictional, simple linear pendulum (Sin(theta) ~ theta) the total energy of the pendulum (K + U) or kinetic plus potential is given by
E = (1/2) m l^2 (d(theta)/dt)^2 + (1/2) mgl (theta)^2
and therefor E = (1/2) mgl(theta0)^2
theta0 =...