有没有一种方法可以将日历输入布局(ala dateInput()
)用于非日期数据?
具体来说,我希望能够打开日历 View ,但要选择日期而不是日期,而是要有一个可能的输入值网格。
如果可能的话,生成的图形将像这样打开:
(注意:上图中的#是任意的和随机的)
我已经看过dateInput
的代码,但是现在还不清楚我如何开始使用输入值而不是日期的方式来转换代码...
最佳答案
这是fullcalendar
包装器转换为fullcalendar.js
的一种方法,不幸的是它仍然包含日期,但是如果您还可以显示数据,那也许还可以。
library(fullcalendar)
my.vals <- c(112,87,45,66,10,6,19,412,8,99,100,74,12,106,
51,58,91,199,14,22,80,18,3,39,2,1,17,596,4,1003,392)
palette <- colorRampPalette(colors=c("#ff0000", "#0000ff"))
cols <- palette(31)
seqtime <- gsub( "[[:alpha:]]+$", "",
seq(strptime("2018-07-01", format="%Y-%m-%d"),
strptime("2018-07-31", format="%Y-%m-%d"),
by="1440 mins") )
data <- data.frame(title = my.vals,
start = seqtime,
end = seqtime,
color = cols)
fullcalendar(data)
它产生了这个。查看器默认为当前月份,而不是数据月份,因此我必须返回显示屏上的
<
才能返回到7月。我选择7月是因为它是从周日开始的,就像上面的随机数据一样。关于r - 如何将日历格式用于Shiny中的数字数据输入?,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/41728525/