如何在闪亮的 dateInput() 中显示空日期？答案

【问题标题】：How to display empty dates with dateInput() in shiny?如何在闪亮的 dateInput() 中显示空日期？
【发布时间】：2015-11-05 14:27:32
【问题描述】：

我使用 dateInput() 在闪亮的应用程序中显示人们的生日。选择没有人时，此输入字段的值需要设置为空或空值。我试过值 = "",
值 = " " 值 = NULL

但它们都不起作用。该字段的内容将自身设置为当前日期。

如何使用 dateInput() 显示空的日期字段？

我有时也想使用 shinyjs::disable() 禁用 dateInput 小部件，但这个函数似乎无法禁用 dateInput 小部件。这正常吗？

【问题讨论】：

标签： r shiny

【解决方案1】：

您可以使用 renderUI() 并编写一个动态控件。看这里： http://shiny.rstudio.com/articles/dynamic-ui.html

ui.R

# Partial example
numericInput("ind", "individual"),
uiOutput("datecontrol")
server.R

部分示例

output$datecontrol<- renderUI({
if(!is.null(input$ind) )  date <- dateInput()
})

【讨论】：

【解决方案2】：

关于您的第二个问题，shinyjs::disable() 应该适用于dateInput()。我刚试过，它对我有用

library(shiny)
library(shinyjs)

shinyApp(
  ui = fluidPage(
    useShinyjs(),
    dateInput("date", "Date"),
    actionButton("btn", "Disable")
  ),
  server = function(input, output, session) {
    observeEvent(input$btn, disable("date"))
  }
)

【讨论】：