Create makeData.R