Update spplotGIF.R