Corrected comments in plot4.R