Fixed comment in plot4.R