Update plot1.R

Cleaned up some comments