在R（R Shiny）中按含纯数字与数字字符串的列排序数据框

示例数据构造 #

先还原目标数据框：

df <- data.frame(
  列A = c("1", "3", "2a", "4", "2b1", "2c", "2b2"),
  列B = c("Value 1", "Value 3", "Value 2a", "Value 4", "Value 2b1", "Value 2c", "Value 2b2"),
  stringsAsFactors = FALSE
)

方法一：使用gtools包的自然排序函数 #

gtools包的mixedorder()函数专门处理这类混合数字与字符的自然排序，无需手动拆分：

# 安装包（首次使用时执行）
install.packages("gtools")
library(gtools)

# 按列A排序
sorted_df <- df[mixedorder(df$列A), ]

方法二：手动拆分字段自定义排序 #

如果不想额外安装包，可以拆分列A的数字前缀和字母后缀，按这两个维度排序：

# 提取数字部分（转整数）和字母后缀
df$数字前缀 <- as.integer(gsub("[^0-9]", "", df$列A))
df$字母后缀 <- gsub("[0-9]", "", df$列A)

# 先按数字前缀排序，再按字母后缀排序
sorted_df <- df[order(df$数字前缀, df$字母后缀), c("列A", "列B")]

两种方法执行后，sorted_df都会得到期望的排序结果：

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