用R随机重命名文件夹中的图像

Question

我有一个包含100,000张图像的文件夹。我想将每个文件（image_.jpg）从1重命名为100,000，但要随机重命名。

我使用以下几行来重命名，但是我不知道如何随机分配文件。

library(jpeg)
setwd("C:/Users/PC/Desktop/R/New dataset/")
folder <- "C:/Users/PC/Desktop/R/New dataset 64"
jpeg <- list.files(folder)
total <- as.numeric(length(jpeg))
first <- 1
max <- first + total -1
file.rename(jpeg, paste0("image_", first:max, ".jpg"))

Answer 1

这是一种方法-

file.rename(jpeg, paste0("image_", sample(length(jpeg)), ".jpg"))

注意-

如果文件夹中存在其他文件，则为了安全起见，您可能希望使用jpeg <- list.files(folder, pattern = ".jpg")或其他某种模式。