R script, readme, codebook for course project