重塑从长到宽格式的数据

Question

我的数据如下所示，

Date         Industry    Indices
2014/12/03   A           2.3
2014/12/03   B           3.4
2014/12/03   C           4.2
2014/12/03   D           3.0
2014/12/03   E           1.8
2014/12/04   A           2.7
2014/12/04   B           3.4
2014/12/04   C           4.5
2014/12/04   D           3.1
2014/12/04   E           2.1
2014/12/05   A           3.1
2014/12/05   B           2.5
2014/12/05   C           3.5
2014/12/05   D           3.1
2014/12/05   E           1.9

我想要的是这样，

Date         A     B    C    D    E
2014/12/03   2.3   3.4  4.2  3.0  1.8
2014/12/04   2.7   3.4  4.5  3.1  2.1
2014/12/05   3.1   2.5  3.5  3.1  1.9

Answer 1

你可以尝试

library(tidyr)
spread(df, Industry, Indices)
#        Date   A   B   C   D   E
#1 2014/12/03 2.3 3.4 4.2 3.0 1.8
#2 2014/12/04 2.7 3.4 4.5 3.1 2.1
#3 2014/12/05 3.1 2.5 3.5 3.1 1.9

或使用base R

reshape(df, idvar='Date', timevar='Industry', direction='wide')

数据

df <- structure(list(Date = c("2014/12/03", "2014/12/03", "2014/12/03", 
"2014/12/03", "2014/12/03", "2014/12/04", "2014/12/04", "2014/12/04", 
"2014/12/04", "2014/12/04", "2014/12/05", "2014/12/05", "2014/12/05", 
"2014/12/05", "2014/12/05"), Industry = c("A", "B", "C", "D", 
"E", "A", "B", "C", "D", "E", "A", "B", "C", "D", "E"), Indices = c(2.3, 
3.4, 4.2, 3, 1.8, 2.7, 3.4, 4.5, 3.1, 2.1, 3.1, 2.5, 3.5, 3.1, 
1.9)), .Names = c("Date", "Industry", "Indices"), class = "data.frame",
row.names = c(NA, -15L))