Updated shiny application