Create plotData.R