我正在使用R的数据包闪亮,我在 ui.R中实现了dateRangeInput:
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 = " - ")
如果我显示所选的最小值和最大值,我会得到以下(奇怪的)输出:
最低日期值
renderText({(input$date[1])})
输出:
15840
最大日期值
renderText({(input$date[2])})
输出:
15979
为什么我在输出中获得这些数字而不是从ui.R本身中选择的数字:2013-05-15和2013-10-01?我怎样才能将它转换成这样的格式? as.Date不起作用。
答案 0 :(得分:10)
实际值是自unix时代以来的天数,请使用format(input$date[1])
。
答案 1 :(得分:3)
你可以使用这样的东西
observe({
x <- format(input$date[1])
cat(x,file="/home/indraneel/temp/r1outfile.txt",append=TRUE)
})
答案 2 :(得分:1)
在我的dateRangeInput选择器的情况下,结果是字符串
date_start <- input$dateRangeInput_name_one[1]
date_end <- input$dateRangeInput_name_one[2]
顺便说一句:如果你约会&#39;是整数,您可以将其转换为&#39; date&#39;使用以下代码:
date_start_date <- as.Date(date_start, origin = "1970-01-01")
date_end_date <- as.Date(date_end, origin = "1970-01-01")