minor changes to shiny app