Question

在按几列分组并汇总dplyr中的几列时，我得到了一个奇怪的数据结构。数据框很大，结果数据结构的怪异性更为显着，但在下面创建了一个小版本的问题。

一切都很好：

library(dplyr)
df <- data.frame(A = c(1,1,2,2), B = c(1,1,2,2), C = c(10,20,30,40), D = c(1000,2000,3000,4000))
df %>% group_by(A) %>% summarize(C = sum(C),D = sum(D)) %>% str()
Classes ‘tbl_df’, ‘tbl’ and 'data.frame':       2 obs. of  3 variables:
 $ A: num  1 2
 $ C: num  30 70
 $ D: num  3000 7000

这是什么？

df %>% group_by(A,B) %>% summarize(C = sum(C),D = sum(D)) %>% str()
Classes ‘grouped_df’, ‘tbl_df’, ‘tbl’ and 'data.frame': 2 obs. of  4 variables:
 $ A: num  1 2
 $ B: num  1 2
 $ C: num  30 70
 $ D: num  3000 7000
 - attr(*, "vars")=List of 1
  ..$ : symbol A
 - attr(*, "drop")= logi TRUE

Answer 1

group_by会创建一些其他属性。如果我们不需要这些属性，那么在ungroup之后summarise是一个选项

df %>% 
   group_by(A, B) %>%
   summarize(C = sum(C),D = sum(D)) %>%
   ungroup() %>%
   str()
#Classes ‘tbl_df’, ‘tbl’ and 'data.frame':       2 obs. of  4 variables:
# $ A: num  1 2
# $ B: num  1 2
# $ C: num  30 70
# $ D: num  3000 7000

R：dplyr仅在分组多个列时才提供奇怪的数据结构

1 个答案: