在Internet Explorer IE9中,当输入5年数字时,应用程序立即崩溃。它不会发生在chrome中。
ui.R
fluidPage(
# Copy the line below to make a date range selector
dateRangeInput("dates", label = h3("Date range")),
hr(),
fluidRow(column(4, verbatimTextOutput("value")))
)
server.R
function(input, output) {
# You can access the values of the widget (as a vector of Dates)
# with input$dates, e.g.
output$value <- renderPrint({ input$dates })
}