Question 6: plot6.R