Update PlotData.r