R Programming Assignment 2 Completed