gvisAnnotationChart и zoomStartTime / zoomEndTime

Question

У меня возникли проблемы с параметрами zoomStartTime и zoomEndTime для gvisAnnotationChart из пакета googleVis.

Конкретно, запущенный пример три:

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)

Создает график с "undefined не является функцией" в области прокрутки y.

Документация гласит: "Увеличьте масштаб окна времени, нет отметок по оси Y", но другой информации нет. Я видел несколько примеров на JSFiddle этой работы, Настройка аннотированной временной шкалы Google, но я не могу перевести это на R. Любая помощь будет оценена.