我正在尝试使用以下粘贴作为条件面板中的条件。
paste0("input.selection", input.Counter).
条件是动态的,主要取决于输入 Counter ,这是一个动作按钮。因此,我试图生成一个像
这样的字符串input.selection1
表示input.Counter = 1.由于条件已经在引号中,我总是会收到错误。我非常感谢这里的任何帮助。更确切地说,我使用了以下代码:
ui.R
library(shiny)
shinyUI(fluidPage(,
sidebarPanel(
conditionalPanel(paste0("input.selection", input.Counter), uiOutput("test")),
actionButton("Counter", "next")),
))
server.R
shinyServer(function(input, output, session) {
output$test <- renderUI({
radioButtons(paste0("choice", input$Counter), label = h4(""), choices = list("A" = 1, "B" = 2, "C" = 3), selected = FALSE)
})
})