在R中的groupby之后连接唯一字符串

Question

我正在对数据框进行分组，并希望连接唯一字符串。

$data = receive-job -Job $global:lvmjob

所需的输出：

data= data.frame(
aa=c(1,2,3,4,5,6,7,8,9,10),
bb=c('a','a','a','a','a','b','b','b','b','b'),
cc=c('hello','hello','hi','message','bye','q','w','r','r','t'))

目前我正在这样做（建议here）：

bb    cc
a     'hello hi message bye'
b     'q w r t'

但是我得到的所有字符串不是 unique 。

Answer 1

在粘贴之前在unique上使用cc，并且也不需要进行mutate步骤，您可以直接使用summarize：

data %>% 
    group_by(bb) %>% 
    summarise(cc = paste(unique(cc), collapse = ' '))

# A tibble: 2 x 2
#  bb    cc                  
#  <fct> <chr>               
#1 a     hello hi message bye
#2 b     q w r t