R-整合数据

我得到的数据框架如下（姓氏-姓名对是唯一的）

我想整合数据并进行类似的转换

surname name
a       b,a,c
b       a,b,c

或者（如果更简单的话）

---

我该怎么做呢？

我同意dupe flag，但我已经提交了我的答案；顺便说一句，第一个预期的输出表是一个副本。如果在评论中有建议，欢迎删除。

复制您的第一个输出

library(tidyverse)
df %>%
    group_by(surname) %>%
    summarise(name = toString(name))
## A tibble: 2 x 2
#  surname name
#  <fct>   <chr>
#1 a       b, a, c
#2 b       a, b, c

库（tidyverse）
df%>%
组别(姓)%>%
摘要（名称=toString（名称））
##一个tibble:2x2
#姓
#     
#1 a b，a，c
#2 b a、b、c

复制第二个输出

df %>%
    group_by(surname) %>%
    mutate(n = paste0("name_", 1:n())) %>%
    spread(n, name)
## A tibble: 2 x 4
## Groups:   surname [2]
#  surname name_1 name_2 name_3
#  <fct>   <fct>  <fct>  <fct>
#1 a       b      a      c
#2 b       a      b      c

df%>%
组别(姓)%>%
变异（n=0（“名称”，1:n（））%>%
排列（n，名称）
##一个tibble:2x4
##组别：姓[2]
#姓氏名称\u 1姓名\u 2姓名\u 3
#         
#1 a b a c
#2 b a b c

---

样本数据

df
library(tidyverse)
df %>%
    group_by(surname) %>%
    summarise(name = toString(name))
## A tibble: 2 x 2
#  surname name
#  <fct>   <chr>
#1 a       b, a, c
#2 b       a, b, c

df %>%
    group_by(surname) %>%
    mutate(n = paste0("name_", 1:n())) %>%
    spread(n, name)
## A tibble: 2 x 4
## Groups:   surname [2]
#  surname name_1 name_2 name_3
#  <fct>   <fct>  <fct>  <fct>
#1 a       b      a      c
#2 b       a      b      c

df <- read.table(text =
    "surname name
a       b
a       a
a       c
b       a
b       b
b       c", header = T)