r - 从 tidyverse 包中消除 ungroup... 消息

Question

当我运行以下命令时，我收到一条烦人的消息:summarise() ungrouping output (override with .groups argument) .
我想知道如何在下面的数据中消除此消息？

library(tidyverse)

hsb <- read.csv('https://raw.githubusercontent.com/rnorouzian/e/master/hsb.csv')  
ave_cluster_n <- as_vector(hsb %>% dplyr::select(sch.id) %>% group_by(sch.id) %>% summarise(n=n()) %>%  ungroup() %>% dplyr::select(n))

# `summarise()` ungrouping output (override with `.groups` argument) # How to eliminate this message 

Answer 1

这可以作为 pkg 选项进行管理:

library(tidyverse)
options(dplyr.summarise.inform = FALSE)

......你再也看不到这些消息了