在您定义前端的ui
上,使用dateInput
并指定ID(我们的ID为myInput
):
dateInput("myInput", "Pick a Date:", value = "2018-04-29")
在server
中,您可以使用myInput
的值并将其映射到可显示在前端的输出:
output$somedate <- renderText({ as.character(input$myInput) })
请记住在前端包含输出:
verbatimTextOutput("somedate")
查看示例: