R Programming Fundamentals Question 30