如何在R语言中批量创建100个含指定内容的文件？

嘿，这个需求其实挺容易实现的，用R的基础工具或者tidyverse系列包都能搞定，我给你分享两种实用的方法：

方法一：基础for循环（适合新手理解逻辑） #

这种方法逻辑直白，一步步帮你理清每一步操作：

# 循环遍历1到100的数字，逐个创建文件
for (file_num in 1:100) {
  # 生成带编号的文件名，比如file_1.txt、file_2.txt...
  target_file <- paste0("file_", file_num, ".txt")
  # 将"Hello world!"写入文件，append=FALSE会覆盖同名文件
  writeLines("Hello world!", con = target_file)
}

简单解释下：

• paste0()是用来拼接字符串的，能快速生成有规律的文件名；
• writeLines()专门用来写入文本行，con参数就是你要写入的文件名称；
• 如果怕覆盖已有文件，可以在创建前加个if (!file.exists(target_file))的判断，避免误操作。

方法二：用purrr包批量处理（更简洁的tidyverse风格） #

如果你平时习惯用tidyverse系列工具，这个方法会更顺手：

# 先安装purrr包（如果还没装的话）
# install.packages("purrr")
library(purrr)

# 先生成所有要创建的文件名列表
file_list <- paste0("file_", 1:100, ".txt")

# 批量写入文件，walk()适合无返回值的操作
walk(file_list, ~writeLines("Hello world!", con = .x))

这里的walk()函数会遍历file_list里的每个文件名，.x代表当前遍历到的文件名，代码整体更简洁，没有循环的嵌套感。

小拓展：指定文件夹存放文件 #

要是你不想把文件都堆在当前工作目录，可以先创建一个文件夹，再写入：

# 创建output_files文件夹（如果不存在就创建，存在的话不报错）
dir.create("output_files", recursive = TRUE, showWarnings = FALSE)

# 生成带文件夹路径的文件名
file_list <- paste0("output_files/file_", 1:100, ".txt")

# 用上面任意一种方法写入即可

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