added slides, synced R code with pdf