minimum working shiny + leaflet plot