Completed assignment 2 of R programming