Data source: http://rosettacode.org/wiki/Animate_a_pendulum