Create timeseries.R