Create series.R