Create seriesRefinery.R