Add a 'width_scale' argument to ggplot2.plot()