plot6.R (ASSIGNMENT 2)