plot1.R (ASSIGNMENT 2)