Remake plots.R