1、R-reshape2-cast

1、cast:     长型数据转宽型数据

（1）、acast,dcast的区别在于输出结果。acast 输出结果为vector/matrix/array，dcast 输出结果为data.frame。

dcast(data, formula, fun.aggregate = NULL, ..., margins = NULL, subset = NULL, fill = NULL, drop = TRUE, value.var = guess_value(data))

acast(data, formula, fun.aggregate = NULL, ..., margins = NULL, subset = NULL, fill = NULL, drop = TRUE, value.var = guess_value(data))

参数：

data  要进行转换的数据框

formula  用于转换的公式

fun.aggregate   聚合函数，表达式为：行变量~列变量~三维变量~......，另外，.表示后面没有数据列，…表示之前或之后的所有数据列

margins  用于添加边界汇总数据

subset   用于添加过滤条件，需要载入plyr包

其他三个参数，用到的情况相对较少。

（2）、cast的例子

x<-data.frame(id=1:6,

              name=c("wang","zhang","li","chen","zhao","song"),

              shuxue=c(89,85,68,79,96,53),

              yuwen=c(77,68,86,87,92,63))

library(reshape2)

x1<-melt(x,id.vars=c("id","name"))

acast(x1,id~variable)

dcast(x1,id~variable)

#从以上两个执行结果来看，可以看出acast和dcast的区别，这里acast输出结果省略了id这个列，而dcast则输出id列

dcast(x1,id~variable,mean,margins=T)   　　　　　　　　#边缘多了对行、列求平均的结果

 dcast(x1,id~variable,mean,margins=c("id"))  　　　　　#只求列平均值，当然也可以只对行求平均值，把id改成variable就可以了

dcast(x1,id+name~variable)　　　　　　　　　　　　　　　#数据还原成原来的样子。

dcast(x1,variable~name)　　　　　　　　　　　　　　　　#对行列进行对调