Added R script, Codebook and README