A dynamic tabPanel title that depends on a selectInput widget

Question

I am writing a shiny app. I want a tabPanel on a tabsetPanel to have a dynamic title that depends on (is the same as) what is selected on a selectInput widget. How can I ach