如何轻松地重塑 R 中的数据以通过键收集值的分布 [重复]

Question

假设我有这个数据框：

> df = structure(list(one = structure(c(1L, 1L, 1L, 2L, 2L, 2L), .Label = c("A", "B"),class = "factor"), two = 1:6),.Names = c("one", "two"),row.names = c(NA, -6L),class = "data.frame")

> df

  one two
1   A   1
2   A   2
3   A   3
4   B   4
5   B   5
6   B   6

想把它改造成这样：

A  B
1  4
2  5
3  6

您可以假设“一”列中每个唯一元素的行数相同。

我可以这样做：

library(tidyr)
df = cbind(df,index=c(1:3,1:3))
spread(df,key = one,value= two)[,-1]

但是，这感觉有点像 hack，因为它使用数据重塑函数，假设结果行是观察结果，并且每行的值都有某种关系。在这个解决方案中，我通过添加允许以我想要的方式进行重塑的索引来弥补这种关系。然后需要我删除该附加信息。感觉不干净。

所以我的问题是，是否有一种功能或简单的单线可以更直接地完成我想要的操作？

Answer 1

我们可以使用unstack

unstack(df, two~one)
#  A B
#1 1 4
#2 2 5
#3 3 6