R 将长表单拆分为行，但重复项合并为以“分隔”分隔的字符串&引用；？

假设我有一个要拆分成行的数据帧

temp = data.frame ( group=c('a','b','c'), fruits = c('apple', 'orange', 'none'), days=c('mon','tues','wed') )
reshape2::dcast(temp , days ~ group, value.var=c ( "fruits") )
  days     a      b    c
1  mon apple   <NA> <NA>
2 tues  <NA> orange <NA>
3  wed  <NA>   <NA> none

铸造将失败，只显示总数。我真正想要的是这样的东西

 days     a      b    c
1  mon apple;orange   <NA> <NA>
2 tues  <NA> orange <NA>
3  wed  <NA>   <NA> none

a、b、c天
1个月苹果；橙色
2星期二橙色
3个星期三没有

---

谢谢

试试这个

tidyverse

解决方案。您可以使用

paste0（）

聚合数据，以获得适当的结构，以便转换为宽格式：

library(tidyverse)
#Code
temp %>%
  group_by(group,days) %>%
  summarise(fruits=paste0(fruits,collapse = ';')) %>%
  pivot_wider(names_from = group,values_from=fruits)

输出：

# A tibble: 3 x 4
  days  a            b      c    
  <chr> <chr>        <chr>  <chr>
1 mon   apple;orange NA     NA   
2 tues  NA           orange NA   
3 wed   NA           NA     none 

#一个tible:3 x 4
a、b、c天
1个月苹果；橙色钠钠
2星期二橙色NA
3星期三无

太好了，谢谢！我还使用了两步解决方案，第一步是用浆糊折叠，但你的解决方案更干净。

# A tibble: 3 x 4
  days  a            b      c    
  <chr> <chr>        <chr>  <chr>
1 mon   apple;orange NA     NA   
2 tues  NA           orange NA   
3 wed   NA           NA     none