Added HW0 R code