Настройте заголовок в renderTable и сделайте его реактивным R Shiny

Question

Когда я использую paste0() для добавления реактивного значения, оно говорит мне, что я пытаюсь сделать что-то, что можно сделать только в реактивной среде. Может кто-нибудь показать мне, как сделать название реактивным?

этот код дает крошечный заголовок в renderTable. Как я могу настроить цвет, размер, шрифт, центр? Спасибо!

shinyApp(
  ui = fluidPage(
    fluidRow(
      column(12,
             tableOutput('table')
      )
    )
  ),
  server = function(input, output) {
    output$table <- renderTable(iris, striped = TRUE, bordered = TRUE, hover = TRUE, spacing = 'm',  
                                width = '75%', align = 'c', rownames = TRUE,  digits = 5,
                                caption = "Iris",
                                caption.placement = getOption("xtable.caption.placement", "top"))
  }
)
}