通过括号中的数字对字符向量进行排序

Question

这些chr必须进行排序：

files <- c("file (1).csv", "file (2).csv", "file.csv")

变成：

chr [1:3] "file.csv" "file (1).csv" "file (2).csv"

到目前为止，我已经找到了带有其mixedsort和mixedorder函数的gtools软件包。 但是它们导致：

> library("gtools")
> mixedsort(files)    
[1] "file (1).csv" "file (2).csv" "file.csv"

有什么办法解决我的问题吗？

Answer 1

我们可以使用sub

i1 <- as.numeric(gsub("\\D+", "", files))
files[order(!is.na(i1), i1)]
#[1] "file.csv"     "file (1).csv" "file (2).csv"