R script 'run_analysis.R' and code book 'Code_book.rtf'