R Programming: Assignment 1