R-Programming Assignment 2