複数キー(一部に逆順)のソート
> f1 = function() arrange(aq, Ozone, desc(Solar.R))
>
> # 複数個指定したり,その一部が逆順の場合も,同じように対応する
> f2 = function() {
+ d = aq[order(aq$Ozone, -aq$Solar.R),]
+ rownames(d) = NULL
+ d
+ }
> identical(f1(), f2())
[1] TRUE
>
> # ほぼ互角
> benchmark(f1(), f2(), columns=c("test", "replications", "elapsed", "relative", "user.self", "sys.self"), replications=1000, order=NULL)
test replications elapsed relative user.self sys.self
1 f1() 1000 9.144 1.015 8.970 0.200
2 f2() 1000 9.010 1.000 8.867 0.188
※コメント投稿者のブログIDはブログ作成者のみに通知されます