Codebook and run_analysis.R code