plot2.R (ASSIGNMENT 2)