我正在使用dygraph()创建动态图,还使用dyRangeSelector()向我展示了该图下方的日期范围。该最后一个功能可以选择默认情况下为您显示日期范围,并且我希望它自动显示最近12个月,但我不知道如何。目前,我拥有的功能是这个
dyRangeSelector (dateWindow = c ("2018-04-01", "2019-03-01"))
好吧,这是我在数据库中拥有的最近12个月,但是随着数据的添加,这些月份在不断变化,为了避免更改脚本,我想执行此功能,以便自动获取输入的最近12个月。有什么办法吗?
使用x [(nrow (x) -12), 1]
和x [nrow (x), 1]
,我可以获得过去12个月的范围,但是当我输入公式时,我得到一个错误,因为它不像我写“ 2018-04-” 01“。
在此先感谢您能给我的帮助。
完整的公式是这个
base1=ts(frequency = 12, start = c(2015, 10),read_excel("C:/.../1.xlsx", sheet = "Hoja1")[,2])
x=read_excel("C:/.../1.xlsx", sheet = "Hoja1")
dygraph(base1) %>% dyAxis("y", label = "Y", valueRange = c(0, 110)) %>% dyAxis("x", label = "X", drawGrid = FALSE) %>% dySeries(drawPoints = FALSE, pointShape = "square", color = "blue") %>% dyRangeSelector(dateWindow = c("2018-04-01", "2019-04-01"))
其他信息
str(base1)
Time-Series [1:43, 1] from 2016 to 2019: 100 100 100 98.9 99.8 ...
- attr(*, "dimnames")=List of 2
..$ : NULL
..$ : chr "Cumplimiento"
str(x)
Classes ‘tbl_df’, ‘tbl’ and 'data.frame': 43 obs. of 2 variables:
$ Mes y año : chr "2015-10-01" "2015-11-01" "2015-12-01" "2016-01-01" ...
$ Cumplimiento: num 100 100 100 98.9 99.8 ...```
如果我愿意
dyRangeSelector(dateWindow = c(x[nrow(x)-11,1], x[nrow(x),1]))
图形显示为白色