Assignment 2 R Programming