R语言数据框中非数值与数值型数据排序技术求助

嗨，这个需求很常见，我给你两种实用的解决方案，你可以按需选择：

基础R原生方法 #

如果你不想额外加载包，用基础R的order()函数就能搞定：

# 假设你的原始数据框名为df
# 1. 按Income.Group升序、Internet.users降序排序
sorted_full <- df[order(df$Income.Group, -df$Internet.users), ]
# 2. 提取前30行得到新数据框
top30_data <- head(sorted_full, 30)

关键细节说明： #

• order(df$Income.Group, -df$Internet.users)：这里的逻辑是先按Income.Group的默认升序排列，通过给Internet.users加负号，实现降序排序（因为order()默认是升序，负数会把数值的大小顺序反转）。
• 用排序后的索引重新筛选原数据框，就能得到完整的排序结果，再用head()取前30行即可。

tidyverse/dplyr 方法（更简洁易读） #

如果你平时用tidyverse工具链，dplyr的语法会更直观：

# 先安装并加载dplyr（首次使用需要安装）
# install.packages("dplyr")
library(dplyr)

top30_data <- df %>%
  # 先按Income.Group升序，再按Internet.users降序
  arrange(Income.Group, desc(Internet.users)) %>%
  # 提取前30行
  slice_head(n = 30)

重要提醒： #

一定要确保Income.Group的排序逻辑是正确的！如果它现在是普通字符串类型，R会按字母顺序排序（比如"high income"会排在"lower middle income"前面，这不符合收入层级的逻辑）。你可以把它转换成有序因子来指定正确的顺序：

df$Income.Group <- factor(df$Income.Group,
                          levels = c("low income", "lower middle income",
                                     "upper middle income", "high income"),
                          ordered = TRUE)

这样排序时就会严格按照你设定的收入层级从低到高排列了。

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