R语言中数据框整数列重排后顺序错误问题排查

核心问题 #

你第三步的代码逻辑完全错误：order()函数返回的是排序后的行索引位置，不是排序后的数值。你把这个索引赋值给MyList$Number，相当于直接替换了原本的数字列，自然会得到混乱的结果，还改变了列的类型。

另外，你用lapply处理拆分后的结果时，得到的是列表列，不是普通的字符/数值列，这也会给后续排序带来隐患。

正确操作步骤 #

1. 生成初始数据框 #

path <- "./your_folder_path" # 替换成你的目标文件夹路径
MyList <- data.frame(Number = list.files(path), Extension = NA, stringsAsFactors = FALSE)

注：R 4.0+版本默认stringsAsFactors = FALSE，写上可兼容旧版本

2. 拆分文件名并转换列类型 #

不要用lapply，改用sapply返回向量类型，或用更简洁的字符串处理工具：

基础R实现

# 拆分文件名，提取数字和扩展名
split_names <- strsplit(MyList$Number, "\\.")
MyList$Number <- sapply(split_names, "[", 1)
MyList$Extension <- sapply(split_names, "[", 2)

# 将Number列转换为数值类型，为排序做准备
MyList$Number <- as.numeric(MyList$Number)

stringr包实现（更直观）

library(stringr)
MyList$Number <- str_extract(MyList$Number, "^\\d+") %>% as.numeric()
MyList$Extension <- str_extract(MyList$Number, "\\w+$")

3. 按Number列数值升序排序 #

现在可以正确排序，两种常用方式：

基础R排序

MyList_sorted <- MyList[order(MyList$Number, decreasing = FALSE), ]

dplyr包排序（更简洁）

library(dplyr)
MyList_sorted <- MyList %>% arrange(Number)

验证结果 #

排序后的MyList_sorted的Number列会按1、2、3...的数值顺序排列，Extension列与原文件一一对应，列类型也符合预期。

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