r - 将 tidyr::complete 与 group_by 一起使用

Question

有谁知道tidyr::complete()是否支持通过group_by()进行分组？

准确地说:我有一些看起来像这样的数据框

df <- data.frame(
  "ID"   = rep(1:2, each = 2),
  "Col1" = c("A", NA, "AA", NA),
  "Col2" = c("B", "C", "BB", "CC"))

现在我想使用complete()和group_by()来计算每组所有可能的组合!

df %>% 
 group_by(ID) %>% 
 complete(Col1, Col2)

  Error in .Call("dplyr_left_join_impl", PACKAGE = "dplyr", x, y, by_x,  : 
  negative length vectors are not allowed

这会导致错误。但是，使用 complete() 而不进行分组可以工作，但这不是我想要的。

df %>% 
 complete(Col1, Col2)

问题:

1. 我是否做错了什么，或者 complete() 根本无法与 group_by 配合使用？
2. 如果是这样，我该如何执行此操作(最好不使用循环)？

Answer 1

您可以使用 complete 和 group_by 来完成此操作，但您必须使用 do 语句:

df %>% 
 group_by(ID) %>% 
 do(complete(., Col1, Col2, fill = list(ID = .$ID)))