не могу создать аннотационную диаграмму (googlevis), используя имеющийся у меня фрейм данных

У меня есть следующий фрейм данных. Столбец аннотации имеет факторный тип, отступы числовые, месяц имеет тип даты.

> dfMerge3
        month departing       Annotation
1  2012-04-01      1244       4th Lowest
2  2012-08-01      1801             <NA>
3  2011-12-01      4030             <NA>
4  2012-12-01         0 Lowest departure
5  2012-02-01      1627             <NA>
6  2012-01-01      2589             <NA>
7  2012-07-01      1107       3rd Lowest
8  2012-06-01      1255       5th Lowest
9  2012-03-01      1104       2nd Lowest
10 2012-05-01      1500             <NA>
11 2011-11-01      1745             <NA>
12 2012-11-01      3327             <NA>
13 2012-10-01      2387             <NA>
14 2012-09-01      2044             <NA>

Я пытался создать gvisAnnotationChart с помощью этого кода.

A2 <- gvisAnnotationChart(dfMerge3, datevar="month",
                          numvar="departing", 
                          titlevar="Title", annotationvar="Annotation",
                          options=list(displayAnnotations=TRUE, 
                                       width=600, height=350,
                                       scaleType='allmaximized')
)
plot(A2)

Я получаю следующую ошибку. Ошибка в (function (..., row.names = NULL, check.rows = FALSE, check.names = TRUE,: arguments подразумевают разное количество строк: 14, 0

Я проверил свои размеры, они 3 на 14.

> dim(dfMerge3)
[1] 14  3

Что мне здесь не хватает?