问题描述
这可能已经有人回答了,但我不知道它是否在日期时间的上下文中。
sliderInput(
"timeRange",label = "Choose Time Range:",min = as.POSIXct("2020-12-01 00:00:00"),max = as.POSIXct("2020-12-31 23:59:59"),value = c(as.POSIXct("2020-12-01 00:00:00"),as.POSIXct("2020-12-01 01:00:00")),timeFormat = "%Y-%m-%d %H:%M",ticks = T,dragRange = FALSE,step=2000,animate = T
)
现在我可以将最小值和最大值限制为每小时的时间间隔,但这意味着我的滑块将只显示 2020-12-01 00:00:00
和 2020-12-01 01:00:00
之间的时间。
我希望这些值是固定的,这样如果我拖动滑块,滑块及其间隔也会移动,但同时保持在 2020-12-01 00:00:00
和 2020-12-31 23:59:59
之间的相同间隔内显示为 this。 (请注意,图像上的时间提前了 6 分钟,我对此没有意见,因为我正在使用的数据集中没有准确的完整小时。
这甚至可能与sliderinput()
有关吗?谢谢!
解决方法
没关系,我有一位同事回答了我的问题。显然你需要从最大值中减去一个小时
max = as.POSIXct("2020-12-31 23:59:59") - hours(1),value = as.POSIXct("2020-12-15 17:00:00"),timeFormat = "%Y-%m-%d %H:%M",ticks = T,step=3600,animate = T