データフレームに次のデータがあります。
aa bb cc
1 3 4 5
2 5 4 3
3 7 8 6
..
100 33 63 55
最後の行の値に基づいて列を並べ替える必要があります。この変換の結果は次のようになります。
bb cc aa
1 4 5 3
2 4 3 5
3 8 6 7
...
100 63 55 33
x <- structure(list(aa = c(3L, 5L, 7L, 33L), bb = c(4L, 4L, 8L, 63L),
cc = c(5L, 3L, 6L, 55L)), .Names = c("aa", "bb", "cc"),
class = "data.frame", row.names = c("1", "2", "3", "100"))
x[,order(-x[nrow(x),])]
ジョシュア・ウルリッヒの答えに基づいて、番号ではなく行名でソートしたい場合:
x[, order(-x[which(rownames(x) == '100'), ]) ]
上記の例のように100
、 は行名です。