¿Alguien sabe una forma ingeniosa de ordenar los resultados que salen de una operación de resumen ddply?

Esto es lo que estoy haciendo para ordenar la salida por profundidad descendente.

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

Con salida ...

> 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

No es demasiado feo, pero espero una manera de hacerlo bien dentro de ddply (). Alguien sabe cómo?

El libro ggplot2 de Hadley tiene este ejemplo para ddply y subconjunto, pero en realidad no está ordenando la salida, solo seleccionando los dos diamantes más pequeños por grupo.

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