R Programming - Programming Assignment 1