重命名文件夹中的多个文件，从 R 中的 001 计数到 xxx

Question

我想重命名已保存在文件夹中的文件列表。当前文件的名称如下所示：

000_html-code.html
...
217_html-code.html

为了处理文件，我想从 001 开始，还有一些文件编号丢失，即 163，这会导致 R 出现问题。因此，我想命名它们：

001_html-code.html
...
216_html-code.html

我尝试了以下代码，但除了没有对 xxx-xxx 施展魔法（而是使用 1:216）之外，它还会引发错误消息（'from' 和 'to' 参数长度不同）：

d <- list.files("C:/Users/[NAME]/Desktop/[FOLDER NAME]")
lapply(d, function (name) {
  file.rename("*_html-code.html", paste0(1:216,"_html-code"))
})

我做错了什么？

非常感谢！

Answer 1

不需要lapply 循环，file.rename 是矢量化的。
试试这个：

d <- list.files("C:/Users/[NAME]/Desktop/[FOLDER NAME]")
file.rename(d, sprintf("%03d_html-code", seq_along(d)))

注意使用sprintf 以获得3 位数字。