R Programming Assignment2 Final Changes