我正在与Josh Kunst在R的优秀highcharter
图书馆制作时间序列情节。
使用此数据:
> dput(t)
structure(c(2, 2, 267822980, 325286564, 66697091, 239352431,
94380295, 1, 126621669, 158555699, 32951026, 23, 108000151, 132505189,
29587564, 120381505, 25106680, 117506099, 22868767, 115940080,
22878163, 119286731, 22881061), .Dim = c(23L, 1L), index = structure(c(1490990400,
1490994000, 1490997600, 1491001200, 1491004800, 1491008400, 1491012000,
1491026400, 1491033600, 1491037200, 1491040800, 1491058800, 1491062400,
1491066000, 1491069600, 1491073200, 1491076800, 1491109200, 1491112800,
1491120000, 1491123600, 1491156000, 1491159600), tzone = "US/Mountain", tclass = c("POSIXct",
"POSIXt")), class = c("xts", "zoo"), .indexCLASS = c("POSIXct",
"POSIXt"), tclass = c("POSIXct", "POSIXt"), .indexTZ = "US/Mountain", tzone = "US/Mountain", .CLASS = "double", .Dimnames = list(
NULL, "count"))
我可以制作此图
带
highcharter::highchart() %>% hc_add_series_xts(t)
但是我收到了这个警告:
'hc_add_series_xts' is deprecated.
Use 'hc_add_series' instead.
因此,作为一种随和的类型,我正是这样做并且使用
highcharter::highchart() %>% hc_add_series(t) %>% hc_xAxis(type = 'datetime')
我制作了这张图:
问题是我真的很喜欢第一张图底部的那个小dygraph
风格的窗口和滑块,更不用说它定位右边y轴上的标签等。
除了"请不要弃用该功能"我怎样才能确保第二个输出 - 使用建议的,很快,似乎只是功能 - 看起来像第一个?