Update Plots.R