animate_frames() iterates through the frames produced by frames_spatial() and writes them incrementally to a temporary directory. The PNG graphics device is only closed at the conclusion of the loop, after all frames are rendered:

It seems that each rendered frame persists in memory until the device is turned off and for large animations can exhaust the available memory. Fixing this may be as simple as moving the graphics rendering code inside the loop.