first commit of R assignment 2