Update plots.R