Create Assignment1Plot1_Rcode