plot4.R (ASSIGNMENT 2)