I am using the packet shiny for R and I implemented a dateRangeInput in my ui.R:
dateRangeInput("date", "Date range:",
start = "2013-05-15",
end = "2013-10-01",
min = "2013-05-15",
max = "2013-10-01",
format = "dd/mm/yy",
separator = " - ")
If I display the selected min and max values, i get the following (weird) output:
Min date value:
renderText({(input$date[1])})
Output:
15840
Max date value:
renderText({(input$date[2])})
Output:
15979
Why do I get these numbers in the output and not the selected ate from the ui.R itself: 2013-05-15 and 2013-10-01 ? And how can I transform it to such a format? as.Date does not work.
实际值是自unix时期以来的天数,使用format(input$date[1])
。
You can use some thing like this
observe({
x <- format(input$date[1])
cat(x,file="/home/indraneel/temp/r1outfile.txt",append=TRUE)
})
In my case for dateRangeInput selector, the results were strings
date_start <- input$dateRangeInput_name_one[1]
date_end <- input$dateRangeInput_name_one[2]
BTW: If you 'date' is integer you can convert it to 'date' by using the following code:
date_start_date <- as.Date(date_start, origin = "1970-01-01")
date_end_date <- as.Date(date_end, origin = "1970-01-01")
The technical post webpages of this site follow the CC BY-SA 4.0 protocol. If you need to reprint, please indicate the site URL or the original address.Any question please contact:yoyou2525@163.com.