Coursera R Programming Assigment 2