codebook and R file