Programming Assignment 2 of R