从长[R重塑数据来宽，聚集在一个变量

Question

我在下面的长格式逐行交易数据

TransactionId ItemCode 
101 123 
101 521 
102 423 
103 871 
103 982 
103 131 

我要重塑这个让所有项目在一个事务中的一行，因此，新的重塑表看起来像这样（宽）

TransactionID ItemCode(s) 
101 123 521 
102 423 
103 871 982 131 

我试图融化和R中铸造，但我有点困惑的方法是如何工作的。另外我的数据集很大，有30M行。我应该如何去做这个过程？

Answer 1

您可以使用plyr包完成您想要的。假设您的数据位于数据帧products_sample中，可以使用ddply与包中的spread。这将从每个TransactionId不同的ItemCodes到不同的列。

library(plyr) 
librray(tidyr) 
result <- ddply(products_sample, "TransactionId", spread, ItemCode, ItemCode) 

使用你提供的数据：

TransactionId ItemCode 
1   101  123 
2   101  521 
3   102  423 
4   103  871 
5   103  982 
6   103  123 

这给

print(result) 
## TransactionId 123 521 423 131 871 982 
##1   101 123 521 NA NA NA NA 
##2   102 NA NA 423 NA NA NA 
##3   103 NA NA NA 131 871 982 

最后两个参数ddply是key和value参数传递给spread。 key标识products_sample的值，其值将用作列名称。 value标识products_sample的值，其值将填充单元格。详情请参阅?spread。