Create Chapter1Figs.R