Coursera R Programming Assignemnt2