added plot to shiny app