Update Lecture note.R