finish R Programing Week 1 and 2