moved plots.r