Coursera R Programming Programming Assingment 1