是否有一个R函数可以梳理.csv文件，并将电子表格中列出的选定文件移动到新文件夹中？

# 安装和加载必要的包
install.packages("tidyverse")
library(tidyverse)

# 设置工作目录和文件路径
setwd("path/to/your/csv/files")
csv_file <- "your_file.csv"
new_folder <- "path/to/your/new/folder"

# 读取.csv文件
data <- read_csv(csv_file)

# 根据列名或索引选择要移动的文件
selected_files <- data$filename  # 假设文件名列为"filename"

# 创建新文件夹
dir.create(new_folder)

# 移动选定的文件到新文件夹
file.copy(selected_files, new_folder)