Plot 2 R-code for Project 1