added legend to Shiny app. 10/17 SL