Here is my UI, I am working on plot #2. The 3 choices that appear are columns (numeric) of df.
shinyApp( #####UI ui = shinyUI(fluidPage( # Appli