Update PLOTS.R