Update HW4-1.R