Committing R programmming assignment 2 solution