Readme file and R file done. Code book a work in progress.