reshape包

melt函數(shù)

#數(shù)據(jù)重塑
#reshape包中的melt函數(shù)和cast函數(shù)
#構(gòu)建數(shù)據(jù)
mydata=data.frame(id=c(1,1,2,2),time=c(1,2,1,2),x1=c(3,5,6,7),x2=c(2,4,6,7))
mydata
#加載reshape包
library(reshape)
#melt函數(shù)參數(shù)解釋.id.vars表示融合字段保留的屬性，measure.vars表示需要融合的字段
(melt(mydata))
(md=melt(mydata,id.vars = c("id","time")))
(md1=melt(mydata,id.vars = c("id","time"),measure.vars = "x1"))

melt函數(shù)結(jié)果

cast函數(shù)

#cast進(jìn)行數(shù)據(jù)重鑄
cast(md,id~variable,mean)
cast(md,time~variable,mean)
cast(md,id+time~variable)
cast(md,id~variable+time)

cast函數(shù)結(jié)果