Update chaptercode.R