Question

我使用dateInput（）在闪亮的应用中显示人的出生日期。如果未选择任何人，则此输入字段的值需要设置为空或NULL。我试过了 value =＆＃34;＆＃34;，
值=＆＃34; ＆＃34; value = NULL

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

如何使用dateInput（）显示空日期字段？

我还想使用shinyjs :: disable（）来禁用dateInput小部件，但是这个函数似乎无法禁用dateInput小部件。这是正常的吗？

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

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

如何用闪亮的dateInput（）显示空日期？

2 个答案: