Как красноречиво рассчитать среднее значение, используя группу по функции в R?

Question

Я пытаюсь сгруппировать по годам, а затем рассчитать среднее значение, но я не знаю, какой самый быстрый способ сделать это, и способ, которым я это делаю, дает мне ошибку.

Сначала я вычисляю, как количество строк в год в таблице:

avg_awarded_moves_year <- imdb_globes %>% group_by(year_film) %>% 
                                          tally() 

А затем снова используйте функцию преобразования, чтобы добавить в таблицу среднее значение за год.

avg_awarded_moves_year <- imdb_globes %>% group_by(year_film) %>% 
                                          transmute(average_per_year = 
                                                      sum(averageRating)/avg_awarded_moves_year$n)

Ошибка, с которой я сталкиваюсь: Error: Column "average_per_year" must be length 12 (the group size) or one, not 76

Могу поспорить, что есть более быстрый и красноречивый способ сделать это. Я попытался разделить сумму на «n ()», но это не сработало. Я не хочу использовать среднюю функцию, потому что образец уже состоит из средних.