Update IS607 Week 3 Quiz.R