Create Figures_Adults.R