Create Ch04CodeExPr.R