R语言中DataFrame输出不符合预期问题排查（附自定义函数代码）

我在R语言里写了一段自定义函数，结果输出的DataFrame完全不符合预期。下面是我目前写的函数代码片段：

func <- function(id = 1:200) {
  dir_char <- as.character(directory) ### 将目录输入转换为字符型
  set_dir <- paste('C:/Users/Junk/Documents/',dir_char,sep="") ### 设置工作目录路径
  setwd(set_dir) ### 将输入目录设为工作目录
  count <- 0
  for (i in id) ### 遍历id值
  {
    id_char <- as.character(i) ### 将id值转换为字符型以设置文件名
    new_file <- data.frame(read.csv(paste(...

这段函数本来是想批量读取指定目录下对应ID的CSV文件，然后把它们合并成一个完整的DataFrame输出，但实际运行后，要么输出空结果，要么DataFrame的结构和我预想的差很多。有没有熟悉R的朋友能帮我排查下问题所在？

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