update code, update slide, modify r-fig