Create animation.r