如何在条件面板环境中使用“粘贴”作为条件?

时间:2016-07-18 08:00:06

标签: r shiny

我正在尝试使用以下粘贴作为条件面板中的条件。

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)
   })
})

0 个答案:

没有答案