Update Quiz 4.R