Поскольку я должен использовать функцию в цикле, я должен использовать функцию dplyr
group_by_at()
и summarise_at()
.К сожалению, я не могу использовать полную функцию из plyr
, чтобы предотвратить удаление пустых групп с помощью индекса.Или есть другой способ предотвратить сброс dplyr пустых групп?
library(dplyr)
library(plyr)
df1 <- mtcars %>%
group_by(gear) %>%
summarise(Mittelwert = mean(mpg, na.rm = TRUE)) %>%
complete(gear, fill = list(Gewicht = 1))
df1
df2 <- mtcars %>%
group_by_at(10) %>%
summarise_at(1, mean, na.rm = TRUE) %>%
complete(gear, fill = list(Gewicht = 1))