R Programming Assignment 2 - Completed work