Я могу придумать, как создать новую переменную, например, IfStanding
:
df$IfStanding = ifelse(df$event %in% c("stoppen"), 1, 0)
или Motion
:
df$Motion = ifelse(df$event %in% c("stoppen","laden","lossen","pauzeren"),
"Standing", "NotStanding")
Затем вы можете использовать новую переменнуюагрегировать данные.