在ShinyR中使用renderUI创建选项卡时，如何在不同对象中重用dataset

ui <- fluidPage(
  tabsetPanel(
    tabPanel("Tab 1", uiOutput("tab1")),
    tabPanel("Tab 2", uiOutput("tab2"))
  )
)

server <- function(input, output) {
  output$tab1 <- renderUI({
    # 在这里使用dataset1
    dataset1 <- iris
    # 创建一个包含dataset1的表格
    tableOutput("table1")
  })
  
  output$tab2 <- renderUI({
    # 在这里使用dataset2
    dataset2 <- mtcars
    # 创建一个包含dataset2的表格
    tableOutput("table2")
  })
  
  output$table1 <- renderTable({
    dataset1
  })
  
  output$table2 <- renderTable({
    dataset2
  })
}