Chapter 14 tmap in shiny