Update plot4.R

Tidied up the comments