R中的條件合並

Question

我想為.txt文件中的數據集的每個文件創建單獨的成績單，其中包含兩個冒號LABEL（單詞）和FILE（單詞在其中的文件）。

所以我的DF（樣本）看起來像這樣：

file        label
 bla_1       _
 bla_1       so
 bla_1       we
 bla_1     know
 bla_1     that
 bla_1     right 
 bla_2     my
 bla_2     mummy
 bla_2     said
 bla_2     so

我可以輕松地將所有內容粘貼在一起：

text <-paste(unlist(sample), collapse =" ");text

結果是

"_ so we know that right my mummy said so"

但是，我怎么能按值插入是否會產生單獨的文本（並將其保存在單獨的文件）語句file ？

bla_1     "_ so we know that right" 
bla_2     "my mummy said so"

謝謝

生殖DF ：

sample <- data.frame(file=c(rep("bla_1",6),rep("bla_2",4)),label=c("_","so","we" ,"know" ,"that" ,"right" ,"my" ,"mummy" ,"said" ,"so"))

Answer 1

正如lukeA指出的那樣，我只是忘記了在這種情況下可以正常工作的聚合函數。

aggregate(label~file, sample, paste, collapse = " ") 

Answer 2

Tidyverse方法：

library(dplyr)

sample %>%
  group_by(file) %>% 
  summarise(paste(label, collapse = " "))