在 R 中将行合并为一个

Question

我有一个如下所示的数据框：

ID  Name                m1  m2  m3  m4  m5  m6  m7  m8
37  Grötlingbo Roes II  0   0   0   0   1   0   0   0   
37  Grötlingbo Roes II  0   1   0   0   0   0   0   0   
37  Grötlingbo Roes II  0   0   1   0   0   0   0   0   
123 Hablingbo Havor III 0   0   0   0   0   0   0   0   
123 Hablingbo Havor III 0   0   0   0   0   0   1   0   
38  Hablingbo Havor I   0   0   1   0   0   0   0   0   
38  Hablingbo Havor I   0   0   0   0   0   0   0   0   
38  Hablingbo Havor I   0   0   0   0   0   0   0   0   
38  Hablingbo Havor I   0   0   0   1   0   0   0   0   
38  Hablingbo Havor I   0   1   0   0   0   1   0   0

我需要将具有相同名称的行及其在 m1 到 m8 列中的观察值合并为一行。只有行名称相同，但观察结果不同。我知道观察结果不会发生冲突，因为我之前已经在整理数据框了。由于我不想添加新列，因此无法使用 pivot_wider。而且我相信 unite 函数仅用于合并列，而不是行。我觉得可以用 group_by 来完成，但不知道我需要添加什么。我已经在这里阅读了很多条目，但还没有找到我的问题的答案。有人有解决办法吗？

Answer 1

尝试 summarize(across()) 方法：

library(dplyr)
df %>%
  group_by(ID, Name) %>%
  summarize(across(starts_with("M"), sum))

`summarise()` regrouping output by 'ID' (override with `.groups` argument)
# A tibble: 3 x 10
# Groups:   ID [3]
     ID Name                       m1    m2    m3    m4    m5    m6    m7    m8
  <dbl> <chr>                   <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
1    37 "Grötlingbo Roes II"        0     1     1     0     1     0     0     0
2    38 "Hablingbo Havor I"         0     1     1     1     0     1     0     0
3   123 "Hablingbo Havor III"       0     0     0     0     0     0     1     0

Answer 2

在base R中，使用aggregate

aggregate(.~ ID + Name, df, sum)

在 R 中将行合并为一个

Combine rows into one in R

r

rows