mathematicaで、ニュートンのゆりかごをアニメーションとして表示するときの入力式を教えていただきたいです。

物理学 | 数学6閲覧xmlns="http://www.w3.org/2000/svg">25