在 R/Shiny 中，为什么使用 map 创建选项卡面板不起作用？

问：

我想达到以下相同的结果：

tabsetPanel(

        # Hide the tab values.
        # Can only switch tabs by using `updateTabsetPanel()`

        tabPanel(1, "Panel 1 content"),
        tabPanel(2, "Panel 2 content"),
        tabPanel(3, "Panel 3 content")
      )

使用此代码如下。为什么它不起作用？

 tabsetPanel(

       map(1:3,~  tabPanel(.x,title = paste0("Panel ",.x," content"))

      ))

谢谢