获取包含当前会话中存在的输入的输入列表

时间:2017-05-11 11:34:34

标签: r shiny

我想检索当前闪亮会话中的输入列表。 我们可以使用"desc"检索输入列表。

我有一个names(input),基于不同的条件,我正在呈现不同类型的输入。我面临的当前问题是当条件改变时,前一个renderUI的输入也出现在列表中。有没有办法只获得当前会话中的输入?

为了更好地解释我的查询,我有以下示例代码:

uiOutput

在上面的代码中,当我第一次点击标有"显示输入"的操作按钮时我得到以下文本作为输出:

btn,slider,txt1,

现在当我将滑块移动到2时,我的输出如下:

btn,slider,txt1,txt2,

此处滑块位于位置1时生成了txt1,此 library(shiny) ui <- fluidPage( sliderInput(inputId = "slider",label = "", min = 1, max = 3, value = 1), uiOutput("UI"), actionButton(inputId = "btn", label = "Show Inputs"), verbatimTextOutput(outputId = "textOp") ) server <- function(input, output){ observeEvent(input$slider,{ if(input$slider == 1){ output$UI <- renderUI( textInput("txt1",label = "Slider in position 1") ) }else if(input$slider == 2){ output$UI <- renderUI( textInput("txt2",label = "Slider in position 2") ) }else{ output$UI <- renderUI( textInput("txt3",label = "Slider in position 3") ) } }) observeEvent(input$btn,{ output$textOp <- renderText( paste0(names(input), ",") ) }) } shinyApp(ui = ui, server = server) 覆盖了此renderUI。我想要一个输入列表,其中output$UI <- renderUI(textInput("txt2",label = "Slider in position 2"))不存在。有没有办法做到这一点?

0 个答案:

没有答案