R file for Programming Assignment 2 added