Some cleanup
plot4() and PNG file; some cleanup on plot2.R