Create week2_complete.R