Update q6plot.R