R Programming - Programming Assignment 2