Added rstudio lecture and some images