Update PlotQ.R