Add janky simpleplot.R