started shiny demo Rmd