有什么办法可以解决R中的分组问题和汇总错误？

Question

任何人都可以帮助我，因为我在分组和汇总时遇到了麻烦，并且在下面有错误输出； summarise()取消输出分组（用.groups参数覆盖）

coffee_ratings %>%
group_by(country_of_origin) %>%
   summarise(averageratings =mean(total_cup_points,na.rm = TRUE))