r - gvisAnnotationChart 和 zoomStartTime / zoomEndTime

Question

我在使用 googleVis 包中的 gvisAnnotationChart 的 zoomStartTime 和 zoomEndTime 参数时遇到了一些问题。

具体来说，运行示例三：

A3 <- gvisAnnotationChart(Stock, datevar="Date",
                           numvar="Value", idvar="Device",
                           titlevar="Title", annotationvar="Annotation",
                           options=list(
                             width=600, height=350,
                            zoomStartTime=as.Date("2008-01-04"),
                            zoomEndTime=as.Date("2008-01-05"))
                          )
plot(A3)

在 y 滚动区域中生成带有“未定义不是函数”的图。

文档声明“放大时间窗口，没有 Y 轴刻度”，但没有其他信息。我在 JSFiddle 上看到了几个关于这项工作的示例，Configuring Google Annotated Timeline，但我无法将其翻译为 R。任何帮助将不胜感激。