我试图使用R dygraphs包来产生毫秒绘图。 我跟随的例子是 https://github.com/rstudio/dygraphs/issues/46
确切的代码是
require(dygraphs); require(xts); require(htmlwidgets);
CustomAxisLabel <- 'function (d, gran) {
return Dygraph.zeropad(d.getHours()) + ":" +
Dygraph.zeropad(d.getMinutes()) + ":" +
Dygraph.zeropad(d.getSeconds()) + "." +
Dygraph.zeropad(d.getMilliseconds());
}'
CustomValueFormat = 'function (ms) {
var d = new Date(ms);
return Dygraph.zeropad(d.getHours()) + ":" +
Dygraph.zeropad(d.getMinutes()) + ":" +
Dygraph.zeropad(d.getSeconds()) + "." +
Dygraph.zeropad(d.getMilliseconds());
}'
len <- 60 * 60 + 10
RDData <- xts(runif(len,0,1), seq(as.POSIXct("2015-04-01 10:00:00"),
as.POSIXct("2015-04-02 15:00:00"), length = len),tz="GMT")
dygraph(RDData) %>%
dyOptions(useDataTimezone = TRUE) %>%
dyAxis("x",axisLabelFormatter =JS(CustomAxisLabel),valueFormatter=JS(CustomValueFormat),ticker="Dygraph.dateTicker")
不幸的是,我无法使用它 - 我认为它与CustomValueFormat存在问题,但我无法找到它。
答案 0 :(得分:0)
这些变化使它为我显示了一个情节:
但是,即使进行了这些更改,该图也会忽略小数秒。我尝试在开头附近添加选项(digits.secs = 3),这也无济于事。