Coursera R Programming Assignment 1