dplyr中空分组数据帧/小标题的构造方法

Question

您知道在data.frame中构造空的分组 tibble或dplyr的方法吗？

对于自定义grouped_df类的构造函数，这是我能想到的最好的选择，但是我不喜欢它，因为结果实际上不是真正的grouped_df。 / p>

library(dplyr)
new_df_custom_grouped <- function(x = group_by(tibble())) {
  # stopifnot(is_grouped_df(x))
  structure(x, 
    class = c("tbl_df_custom_grouped", "tbl_df_custom", class(x)))
}

动机

为了使我的代码符合tidy code principles，我研究了Advanced R本书的section about constructors for S3 classes。

要使用dplyr::group_by()包的article on S3 vectors中的 cast 方法为vctrs定义自定义方法，我需要一个自定义分组数据框（如果您对详细信息感兴趣，请参见vctrs GitHub issue #155）。