R Projects - Assignment 1