I got the error when I use dplyr and lubridate package.
library(lubridate)
library(dplyr)
summary(data)
data %>%
group_by(yearmonth = format(ymd_hm(Time), "%Y-%m")) %>%
summarise(Ratio = mean(Emotion == "Positive"))
I got the error when I use dplyr and lubridate package.
library(lubridate)
library(dplyr)
summary(data)
data %>%
group_by(yearmonth = format(ymd_hm(Time), "%Y-%m")) %>%
summarise(Ratio = mean(Emotion == "Positive"))