转置的数据帧[重复](Transposing a data frame [duplicate])

这个问题已经在这里有一个答案：

• 重塑宽幅，多列长格式 4个回答

我有一个关于重新塑造的问题（如果这是正确的字）的数据帧，以它的转置版本。 我想利用这样的：

A   B   C   
1   6   1
1   18  1
1   21  1
3   18  1
3   21  1
4   6   1
4   18  1
4   20  1
4   21  1

并把它变成像一个数据帧：

A   B_1 C_1 B_2 C_2 B_3 C_3 ...
1   6   1   18  1   21  1
3   18  1   21  1   
4   6   1   18  1   20  1   21  1

有一些去到R中函数，我不知道或应该我遍历这个过程？ 谢谢！

Answer 1:

DF <- read.table(text="A   B   C   
1   6   1
1   18  1
1   21  1
3   18  1
3   21  1
4   6   1
4   18  1
4   20  1
4   21  1",header=TRUE)

首先创建一个索引变量：

library(plyr)
DF <- ddply(DF,.(A),transform,No=seq_along(A))
#   A  B C No
# 1 1  6 1  1
# 2 1 18 1  2
# 3 1 21 1  3
# 4 3 18 1  1
# 5 3 21 1  2
# 6 4  6 1  1
# 7 4 18 1  2
# 8 4 20 1  3
# 9 4 21 1  4

现在融化data.frame和转换为宽幅：

library(reshape2)
DF <- melt(DF,id.vars=c("A","No"))
res <- dcast(DF,A~No+variable)
#   A 1_B 1_C 2_B 2_C 3_B 3_C 4_B 4_C
# 1 1   6   1  18   1  21   1  NA  NA
# 2 3  18   1  21   1  NA  NA  NA  NA
# 3 4   6   1  18   1  20   1  21   1

要想在公式事项：

res <- dcast(DF,A~variable+No)
#   A B_1 B_2 B_3 B_4 C_1 C_2 C_3 C_4
# 1 1   6  18  21  NA   1   1   1  NA
# 2 3  18  21  NA  NA   1   1  NA  NA
# 3 4   6  18  20  21   1   1   1   1

文章来源: Transposing a data frame [duplicate]