R Plyr - 从 DDPLY 订购结果？

有谁知道一种巧妙的方法来对 ddply 汇总操作的结果进行排序？

这就是我正在做的以获得按深度降序排序的输出。

  ddims <- ddply(diamonds, .(color), summarise, depth = mean(depth), table = mean(table))
  ddims <- ddims[order(-ddims$depth),]

随着输出...

> ddims
  color    depth    table
7     J 61.88722 57.81239
6     I 61.84639 57.57728
5     H 61.83685 57.51781
4     G 61.75711 57.28863
1     D 61.69813 57.40459
3     F 61.69458 57.43354
2     E 61.66209 57.49120

不太难看，但我希望有一种方法可以在 ddply() 中很好地完成它。有人知道怎么做吗？

Hadley 的 ggplot2 书中有 ddply 和 subset 的示例，但它实际上并没有对输出进行排序，只是选择每组中两个最小的菱形。

ddply(diamonds, .(color), subset, order(carat) <= 2)

我会利用这个机会做一些广告data.table，它的运行速度更快，并且（在我看来）至少写起来也同样优雅：

library(data.table)
ddims <- data.table(diamonds)
system.time(ddims <- ddims[, list(depth=mean(depth), table=mean(table)), by=color][order(depth)])

   user  system elapsed 
  0.003   0.000   0.004 

相比之下，无需订购，您的ddply代码已经花费了 30 倍的时间：

  user  system elapsed 
 0.106   0.010   0.119

我对哈德利的出色工作表示敬意，例如在ggplot2，以及普遍的敬畏，我必须承认对我来说，data.table完全更换ddply——出于速度原因。