Update Problem 1.R