将一列的唯一值转换为多列，其中包含另一列中的对应值答案

【问题标题】：Transform unique values of a column into multiple columns containing their corresponding values in another column将一列的唯一值转换为多列，其中包含另一列中的对应值
【发布时间】：2016-10-25 15:06:10
【问题描述】：

这是一个类似于我正在使用的示例数据框：

set.seed(74.3)
df<-data.frame(ID=sample(c(1000:1004),size=20,replace=T),
Fruit=sample(c("Apple","Banana","Pear","Orange","Plum"),size=20,replace=T))
library(dplyr) 
df <- df %>%
group_by(ID,Fruit) %>% 
summarise(n=n())


      ID  Fruit     n
   (int) (fctr) (int)
1   1000 Banana     1
2   1000 Orange     3
3   1000   Pear     1
4   1001 Banana     1
5   1001   Plum     2
6   1002 Banana     1
7   1003 Banana     1
8   1003 Orange     2
9   1003   Pear     1
10  1003   Plum     1
11  1004  Apple     2
12  1004 Banana     2
13  1004 Orange     1
14  1004   Pear     1

如何转置 Fruit 和 n 列并对 ID 进行分组，以便每种水果都是一个单独的列，其中包含与 ID 对应的水果数量？

  ID  Banana  Orange  Pear  Plum  Apple  
1000     1       3      1     0     0
1001     1       0      0     2     0
1002     1       0      0     0     0
1003     1       2      1     1     0
1004     2       1      1     0     2

抱歉，如果此问题已发布。我已经花了几个小时搜索但没有答案。

【问题讨论】：

搜索时查看 reshape wide
你可以看this的帖子

标签： r dataframe data-manipulation

【解决方案1】：

使用tidyr

library(tidyr); 
spread(df, Fruit, n, fill=0)

Source: local data frame [5 x 6]
Groups: ID [5]

     ID Apple Banana Orange  Pear  Plum
* <int> <dbl>  <dbl>  <dbl> <dbl> <dbl>
1  1000     0      1      3     1     0
2  1001     0      1      0     0     2
3  1002     0      1      0     0     0
4  1003     0      1      2     1     1
5  1004     2      2      1     1     0

或者，您可以使用 dcast from reshape2 或 data.table as

reshape2::dcast(df, ID~Fruit, value.var = "n", fill = 0)

【讨论】：