Commit R files of Question 4-6 of assignment