Я пытался разработать эту tabsetpanel некоторое время, но безуспешно. Цель состоит в том, чтобы собрать вкладки динамически. После того, как пользователь нажмет кнопку поиска, вкладки будут собраны из выбора пользователя в selectizeInput. Каждая вкладка будет иметь определенный c контент. Когда пользователь снова нажимает кнопку поиска, вкладки должны быть построены снова с информацией из selectizeInput без дублирования.
Я ценю любую помощь.
результат должен быть похож на это изображение :
library(shiny)
ui <- fluidPage(
title = "Examples of DataTables",
sidebarLayout(
sidebarPanel(
selectizeInput(
'state', 'State', choices = state.name, multiple = TRUE
),
actionButton("search", "Search"),
),
mainPanel(
tabsetPanel(
id = 'dataset',
tabPanel("tab1", verbatimTextOutput("tab1"))
)
)
)
)
server <- function(input, output) {
output$tab1 <- renderPrint({
"tab1"
})
}
shinyApp(ui, server)