Мне кажется, что с помощью dplyr есть более элегантный способ воссоздать следующий результат соединения результатов суммирования с помощью mutate.
inner_join(iris,
iris %>% group_by(Species) %>% summarize(n = length(Species),
Mean.Sepal.Length = mean(Sepal.Length)),
by = "Species")
Когда я чувствую, что есть способ использовать мутирование таким образом ...
#iris %>% mutate(???)