Create problem_3.r