问题描述
我正在尝试将renderUI创建的选项卡附加到现有选项卡集。最小示例:
alice
bob joseph
tom richard elaine albert
michelle amy colin liam
我可以得到一个完整的tabsetPanel进行渲染,但是不能获得现有tabsetPanel中的单个标签。
解决方法
您可以使用insertTab
或appendTab
:
ui <- fluidPage(sidebarLayout(sidebarPanel(),mainPanel(
tabsetPanel(id = "myTabsetPanel",tabPanel("static_tab",tabName = "static_tab"))
)))
server <- function(input,output) {
appendTab(inputId = "myTabsetPanel",tabPanel("render_tab",p('it worked')))
}
shinyApp(ui = ui,server = server)
renderUI
无效,因为它创建了div
标签-但是,您需要创建一个li
标签。