数据操作与R：重组数据

Question

我有一个数据集，看起来像这样：

a <- data.frame(rep(1,5),1:5,1:5) 
b <- data.frame(rep(2,5),1:5,1:5) 
colnames(a) <- c(1,2,3) 
colnames(b) <- c(1,2,3) 
c <- rbind(a,b) 

    1 2 3 
1 1 1 1 
2 1 2 2 
3 1 3 3 
4 1 4 4 
5 1 5 5 
6 2 1 1 
7 2 2 2 
8 2 3 3 
9 2 4 4 
10 2 5 5 

，但我希望它被重组到这一点：

2_1 2_2 3_1 3_2 
    1 1 1 1 1 
    2 2 2 2 2 
    3 3 3 3 4 
    4 4 4 4 4 
    5 5 5 5 5 

Answer 1

a <- data.frame(rep(1,5),1:5,1:5) 
b <- data.frame(rep(2,5),1:5,1:5) 
colnames(b) <- colnames(a) <- paste("a", c(1,2,3), sep='') 
d <- rbind(a,b) 
library(reshape) 
recast(d, a2 ~ a1, measure.var="a3") 

我改变你的榜样稍微，因为它有数字作为变量名称。这是不推荐的，因为它允许下面的废话：

"1" <- 3 
print(1) 
[1] 1 
print("1") 
[1] "1" 
print(`1`) 
[1] 3 

需要我说更多？