聚合行和添加新变量

Question

我有一个数千行的数据框，其中有两列我的兴趣，ID和日期。一些ID是重复的，但不是日期。我想每个ID只有一行，然后将不同的日期存储到列中，如：UniqueID，date1，date2等等。

有谁知道什么是最好的方式来做到这一点？我使用R，有什么最佳的方式来做到这一点在R？

Answer 1

你的意思是这样的吗？

require(dplyr) 
require(tidyr) 
dates <- c("02/26/92", "02/27/92", "01/14/92", "02/28/92", "02/01/92") 
dat <- data.frame(id = c(1,1,2,3,2), date = as.Date(dates, "%m/%d/%y")) 

DAT如下所示：

id  date 
1 1 1992-02-26 
2 1 1992-02-27 
3 2 1992-01-14 
4 3 1992-02-28 
5 2 1992-02-01 

有以下伎俩

dat %>% 
    select(id, date) %>% #here you select the columns that you want to use 
    group_by(id) %>% 
    mutate(seq = paste0("date", row_number(id))) %>% 
    spread(seq, date) 

成为这样的：

Source: local data frame [3 x 3] 
Groups: id [3] 

    id  date1  date2 
* <dbl>  <date>  <date> 
1  1 1992-02-26 1992-02-27 
2  2 1992-01-14 1992-02-01 
3  3 1992-02-28  <NA>