Fix in dataplot.r