数据框中行合并的问题

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

如何将数据框中第一列数值（id）相同的行合并，合并相同的列而保留不同的列。
实际的例子是：
id<-(1,2,1)
name<-(Tom, Jerry, Tom)
lia_id<-(101,102,103)
希望处理后的结果可以变成：
id<-(1,2)
name<-(Tom, Jerry)
lia_id_1<-(101,102)
lia_id_2<-(103,NA)
有没有大神解答一哈，实际数据量在80k行左右。

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏1 回帖

关键词：行合并 数据框 如何

1. library(tidyverse)
   
2. data <- data_frame(id = c(1,2,1),
   
3.                    name = c("Tom", "Jerry", "Tom"),
   
4.                    lia_id = c(101, 102, 103))
   
5. data %>%
   
6.     group_by(id) %>%
   
7.     arrange(lia_id) %>%
   
8.     mutate(all_id = paste0("lia_id", row_number())) %>%
   
9.     spread(key = all_id, value = lia_id, fill = NA)
   
10. # 结果如下：
    
11. Source: local data frame [2 x 4]
    
12. Groups: id [2]
    
13. 
    
14.      id  name lia_id1 lia_id2
    
15. * <dbl> <chr>   <dbl>   <dbl>
    
16. 1     1   Tom     101     103
    
17. 2     2 Jerry     102      NA

复制代码