Updated pointb-plot.R