adding advance4 for model selection using function created in the course: data analysis and statistical inference.