Как аннотировать текст в пустом пространстве внутри нечетного граненого ggplot. Позволяет получить граненый ggplot с данными, как показано ниже, с 2 строками и 2 столбцами. Таким образом, есть место вместо 2 строки, 2-й столбец.

  df<- data.frame(Ara = rep("XTX", each = 3),
              Len = c(744, 750, 755),
              Mon = c("Sep", "Oct","Nov"),
              Value=c(11.224,10.15,4.23))
  df
  facetplot<-ggplot(df, aes(x=Value, y=Len, shape=Ara))+
      geom_point(size=5.0)+
      theme(legend.position = c(.7, .4), legend.direction="vertical")+
      facet_wrap(~Mon,scales="free_x", nrow=2)
  facetplot

 Теперь я пытаюсь комментировать некоторый текст в пространстве, но не смог (как написано красным на рисунке). Я ищу что-то похожее на legend.position для аннотированного текста. У кого-нибудь есть идеи на этот счет. Или каков будет возможный обходной путь. Спасибо.