R Programming - Assignment 1