r - 转置 R 数据框并连接多列中出现的值

Question

我需要从以下内容转换 R 中的数据框：

id    past     present  future
id1   A        A        B
id2   B                 C
id3   A        C        
id4   B         B        A

对此：

id    A              B              C
id1   past, present  future
id2                  past           future
id3   past                          present
id4   future         past, present

我尝试过使用 dcast，但我对 R 很陌生，并且无法获得任何接近我需要的东西。我应该使用别的东西吗？

谢谢！

Answer 1

我们可以gather把它变成'long'格式，按'id'、'val'、paste'key'元素组合在一起，然后spread把它变成'wide'

library(tidyverse)
gather(df1, key, val, -id) %>%
        filter(val !="") %>% 
        group_by(id, val) %>% 
        summarise(key = toString(key)) %>% 
        spread(val, key, fill = "")
# A tibble: 4 x 4
# Groups:   id [4]
#     id             A             B       C
# * <chr>         <chr>         <chr>   <chr>
#1   id1 past, present        future        
#2   id2                        past  future
#3   id3          past               present
#4   id4        future past, present