updated Shiny lecture