R Programming Assignment 3 Q2 Done