總和行每個唯一的值

Question

我有看起來像這樣的一個數據幀：

> df 
      date day  x y z 
[1] 2014-02-24 Thursday 100 83 39 
[2] 2014-02-26 Wednessday 486 189 171 
[3] 2014-02-26 Wednessday 426 427 428 
[4] 2014-02-26 Wednessday 423 286 195 
[5] 2014-02-27 Thursday 374 339 229 
[6] 2014-02-27 Thursday 744 496 489 

我要總結x，y，並且z每個唯一的date和day變量。它應該看起來像這樣：

  date day  x y z 
[1] 2014-02-24 Thursday 100 83 39 
[2] 2014-02-26 Wednessday 1335 902 794 
[6] 2014-02-27 Thursday 1118 835 718 

請幫忙嗎？非常感謝！！

Answer 1

有幾種方法可以做到這一點（以及許多答案）關於如何做到這一點。

這裏有三種常用的方法，一種使用「data.table」，另一種使用「dplyr」。

aggregate(cbind(x, y, z) ~ date + day, mydf, sum) 
#   date  day x y z 
# 1 2014-02-24 Thursday 100 83 39 
# 2 2014-02-27 Thursday 1118 835 718 
# 3 2014-02-26 Wednessday 1335 902 794 

library(data.table) 
as.data.table(mydf)[, lapply(.SD, sum), by = list(date, day)] 
#   date  day x y z 
# 1: 2014-02-24 Thursday 100 83 39 
# 2: 2014-02-26 Wednessday 1335 902 794 
# 3: 2014-02-27 Thursday 1118 835 718 

library(dplyr) 
mydf %>% group_by(date, day) %>% summarise_each(funs(sum)) 
# Source: local data frame [3 x 5] 
# Groups: date 
# 
#   date  day x y z 
# 1 2014-02-24 Thursday 100 83 39 
# 2 2014-02-26 Wednessday 1335 902 794 
# 3 2014-02-27 Thursday 1118 835 718 

Answer 2

嘗試連接「日期」和「日」的人造色譜柱。