如何在不汇总记录的情况下将长格式的数据框转换为宽格式？

Question

从这：

> test <- data.frame(x = c("a","a","a"), y = c("b","b","c"), z = c(1,2,1)) 
> test 
    x y z 
1 a b 1 
2 a b 2 
3 a c 1 

要这样：

x b c 
1 a 1 NA 
2 a 2 NA 
3 a NA 1 

Answer 1

由于在test数据帧中的x列不唯一标识行，但你不想做任何聚合，则需要用一个唯一的id列来扩充数据帧，然后使用reshape2包中的dcast()：

require(reshape2) 
test$id <- 1:nrow(test) 


> dcast(test, id + x ~ y, value_var = 'z')[,-1] 
    x b c 
1 a 1 NA 
2 a 2 NA 
3 a NA 1