Example of using ggplot in shiny