Shiny do it for you (tabsetPanel)