week_7_demo.R