Получение ошибки "Не удалось проанализировать все форматы. Форматы не найдены"

Question

Я получил ошибку при использовании пакета dplyr и lubridate.

library(lubridate)
library(dplyr)

summary(data)
data %>%
   group_by(yearmonth = format(ymd_hm(Time), "%Y-%m")) %>%
   summarise(Ratio = mean(Emotion == "Positive"))