如何按字符串变量升序、数值/日期变量降序排序dataframe？

基础R解决方案 #

方法1：通过decreasing参数指定各列排序方向

order函数支持传入逻辑向量作为decreasing参数，对应每个排序变量的升降序，无需额外类型转换，逻辑更清晰：

# 字符列升序，数值列降序
dataframe <- dataframe[order(dataframe$stringvariable, dataframe$numericvariable, decreasing = c(FALSE, TRUE)), ]

# 字符列升序，日期列降序
dataframe <- dataframe[order(dataframe$stringvariable, dataframe$datevariable, decreasing = c(FALSE, TRUE)), ]

方法2：对数值/日期列取负（需注意列类型）

• 数值列：确保列是数值型，直接加负号即可。若列是字符型数值，需先转换类型：

# 检查并转换列类型
if (class(dataframe$numericvariable) == "character") {
  dataframe$numericvariable <- as.numeric(dataframe$numericvariable)
}
dataframe <- dataframe[order(dataframe$stringvariable, -dataframe$numericvariable), ]

• 日期列：Date类型无法直接取负，需先转为数值（Date本质是1970-01-01起的天数）：

dataframe <- dataframe[order(dataframe$stringvariable, -as.numeric(dataframe$datevariable)), ]

dplyr包解决方案（更简洁直观） #

使用dplyr的arrange函数，配合desc()直接指定降序，无需处理类型或负号：

library(dplyr)
# 字符列升序+数值列降序
dataframe <- dataframe %>% 
  arrange(stringvariable, desc(numericvariable))

# 字符列升序+日期列降序
dataframe <- dataframe %>% 
  arrange(stringvariable, desc(datevariable))

你的代码报错原因 #

• -dataframe$numericvariable报错：大概率是该列不是数值型（比如字符型数值或因子），需先转换为数值型再取负。
• rev(dataframe$numericvariable)报错：rev()是反转整个列的顺序，并非生成降序排序的键，和第一列的分组排序逻辑不匹配，导致order函数无法识别正确规则。

内容的提问来源于stack exchange，提问作者Ray