CodeBook.md add

Correction of the final data.txt and R script