R programming week 3 and 4 added