2

我有以下数据集：

Date<-c("9/7/2010","9/7/2010","9/7/2010",
        "9/7/2010","9/7/2010","9/7/2010","9/8/2010")
EstimatedQuantity<-c(3535,2772,3279,3411,3484,3274,3305)
ScowNo<-c("4001","3002","4002","BR 8","4002","BR 8","4001")

dataset<- data.frame(EstimatedQuantity,Date,ScowNo)

我正在尝试将数据集转换为列联表，然后再转换回常规数据框：

xtabdata<-as.data.frame.matrix(xtabs(EstimatedQuantity~Date+ScowNo,
                                     data=dataset),
                               row.names=(dataset$Date),optional=F)
4

1 回答 1

5

这是你想要的吗？

as.data.frame(unclass(xtabs(EstimatedQuantity~Date+ScowNo,data=dataset)))
于 2013-05-17T17:08:03.507 回答