R script and Codebook

Required for course project.