R Advanced Practice Question 19