在闪亮的输入中设置默认值(如果用户在UI中删除它)
在闪亮的输入中设置默认值(如果用户在UI中删除它)
提问于 2022-01-14 12:17:28
我正试图在我闪亮的应用程序中为numericInput()设置一个默认(或后备)值，以防止NAs。
我知道，NA可以稍后在server.r中处理，但我想知道，每当用户在ui中删除它时，是否有一种更优雅的方法来替换输入中的值。
Stack Overflow用户
回答已采纳
发布于 2022-01-14 13:04:40
最好的方法是将validate包与need()一起使用(请参阅此所以线)，但这里有一些更简单、更接近您所要求的内容：
library(shiny)
ui <- fluidPage(
numericInput("obs", "Observations:", 10, min = 1, max = 100),
verbatimTextOutput("value")
)
server <- function(input, session, output) {
dafault_val <- 0
observe({
if (!is.numeric(input$obs)) {
updateNumericInput(session, "obs", value = dafault_val)
}
})
output$value <- renderText({ input$obs })
}
shinyApp(ui, server)页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/70710454
复制相关文章
相似问题
腾讯云开发者
