R attempt

Try to solve the assignment with R code on 2008.csv file