我想按多列对数据帧进行排序。例如，对于下面的数据帧，我希望按列“z”（降序）排序，然后按列“b”（升序）排序：
dd <- data.frame(b = factor(c("Hi", "Med", "Hi", "Low"),
levels = c("Low", "Med", "Hi"), ordered = TRUE),
x = c("A", "D", "A", "C"), y = c(8, 3, 9, 9),
z = c(1, 1, 1, 2))
dd
b x y z
1 Hi A 8 1
2 Med D 3 1
3 Hi A 9 1
4 Low C 9 2
当前回答
就像很久以前的机械卡片分拣机一样，首先按最不重要的键排序，然后按下一个最重要的键进行排序。不需要库，可以使用任意数量的键以及任意组合的升序和降序键。
dd <- dd[order(dd$b, decreasing = FALSE),]
现在我们准备好做最重要的关键。这一类是稳定的，最重要的密钥中的任何联系都已经解决。
dd <- dd[order(dd$z, decreasing = TRUE),]
这可能不是最快的，但它确实简单可靠
其他回答
或者您可以使用包doBy
library(doBy)
dd <- orderBy(~-z+b, data=dd)
另一种选择是使用rgr包：
> library(rgr)
> gx.sort.df(dd, ~ -z+b)
b x y z
4 Low C 9 2
2 Med D 3 1
1 Hi A 8 1
3 Hi A 9 1
当我想自动化n列的排序过程时，我正在与上述解决方案作斗争，因为每一列的列名都可能不同。我从psych包中找到了一个非常有用的功能，可以直接实现这一点：
dfOrder(myDf, columnIndices)
其中columnIndex是一个或多个列的索引，按要对其排序的顺序排列。此处提供更多信息：
“psych”包中的dfOrder函数
这里有很多很好的答案，但dplyr提供了我唯一能快速、容易记住的语法（因此现在经常使用）：
library(dplyr)
# sort mtcars by mpg, ascending... use desc(mpg) for descending
arrange(mtcars, mpg)
# sort mtcars first by mpg, then by cyl, then by wt)
arrange(mtcars , mpg, cyl, wt)
对于OP的问题：
arrange(dd, desc(z), b)
b x y z
1 Low C 9 2
2 Med D 3 1
3 Hi A 8 1
4 Hi A 9 1
或者，使用包扣减器
library(Deducer)
dd<- sortData(dd,c("z","b"),increasing= c(FALSE,TRUE))
