added shiny code