Update HW6.R