r - 总结不再分组

Question

我认为 dplyr 很棒。但是我最近更新了包，似乎 summarize 不再按组汇总了。类似下面的代码，用于升级前分组汇总:

iris_tdt <- tbl_dt(iris)
iris_tdt %.% group_by(Species) %.% summarise(avg_petal_width = mean(Petal.Width))

  avg_petal_width
1        1.199333

这用于输出包含 Species 和 avg_petal_width 的表格。现在 Species 列似乎已删除，avg_petal_width 聚合为单个值。 group_by 似乎在工作，所以我猜这是 summarise 的问题。

grp <- group_by(iris_tdt,Species)
groups(grp)

[[1]]
Species

甚至 Vignette 中的示例也无法正常工作。

hflights_df <- tbl_df(hflights)
planes <- group_by(hflights_df, TailNum)
delay <- summarise(planes,
  dist = mean(Distance, na.rm = TRUE),
  delay = mean(ArrDelay, na.rm = TRUE))

delay
      dist    delay
1 787.7832 7.094334

如有任何建议，我们将不胜感激。

packageDescription("dplyr")$Version #--> 0.1.2
R.version.string #--> "R version 3.0.2 (2013-09-25)"

Answer 1

你可能有另一个summarise函数，可能来自 plyr 包。

# Works
library(dplyr)
iris_tdt <- tbl_dt(iris)
iris_tdt %.% 
  group_by(Species) %.% 
  summarise(avg_petal_width = mean(Petal.Width))

# No longer works...
library(plyr)
iris_tdt <- tbl_dt(iris)
iris_tdt %.% 
  group_by(Species) %.% 
  summarise(avg_petal_width = mean(Petal.Width))

如果你真的需要这两个包，你可以尝试加载 dplyr 最后，或为所有受影响的函数添加前缀(summarise、mutate 等)及其命名空间(dplyr::summarise 等)