无法使用removeUI

r
shiny

2017-03-02 75 views 0 likes

删除输入我有两个输入从ui.R无法使用removeUI

fileInput(inputId = "FileInput",label = "Choose a csv file",accept = '.csv'), 
uiOutput("SKU")

内部服务器上删除我使用的是observeEvent删除这些2 inputs，并插入一个。虽然insertUi正在工作，但我无法删除the other 2。

PFB代码：

observeEvent(input$Save,{ 
    removeUI(
     selector = "div:has(> #FileInput)"  
    ) 
    insertUI(
     selector = "#Save", 
     where = "afterEnd", 
     ui =fluidPage( 
     tags$hr(), 
     fluidRow(column(offset=0,1,actionButton("clean","Start cleaning the Data"))) 
    ) 
    ) 
    })

来源

2017-03-02 Karan Gulati

请提供的完整代码。 – BigDataScientist

这是代码。我有两个输入（fileInput和uiOutput），我想使用removeUI（）删除2。 –

如果你提供了一个完整的应用程序，你会得到更高的答案，应该如何测试，......只是说 – BigDataScientist

回答

看来你有其中shiny blog example将文本由ID为一个div包裹它来治疗它以同样的方式。

tags$div(
    fileInput(inputId = "FileInput",label = "Choose a csv file",accept = '.csv'), 
    id='FileInput' 
)

例

ui <- fluidPage(
    mainPanel(
    tags$div(fileInput('element1','Input file...'),id='element1'), 
    actionButton('remove','Remove File Input') 
    ) 
) 

server <- function(input, output) { 
    observeEvent(input$remove,{ 
    removeUI(selector = '#element1') 
    }) 
} 

shinyApp(ui = ui, server = server)

来源

2017-12-29 15:05:05 StatisticianSix

无法使用removeUI

回答

相关问题