Committing R Programming Assignment