Create programmingassignment2.R