Update Rforecastio.R