Update week 1 note.R