Update chap2.R