[R] My Trips : map(rworldmap) + publish(Shiny)