R prog assignment 2 commit

See above