针对你这种200万行、每行约200字符的大字符向量写入需求，我有几个经过实践验证的高效方案，能大幅提升写入速度：

• 转成单列Data Frame使用fwrite（推荐）
  虽然fwrite只支持data frame/matrix，但把字符向量转成单列data frame的开销极小，完全可以忽略，而fwrite的IO优化能带来数量级的速度提升。示例代码：

  library(data.table)
  # 把字符向量转成单列data.table
  dt <- data.table(content = your_char_vector)
  # 用换行符分隔，不写入列名，模拟直接写向量的效果
  fwrite(dt, "output.txt", sep = "\n", col.names = FALSE)
  

  这个方法的优势在于data.table的底层是C++实现的IO操作，能最大限度利用系统的IO性能。

• 使用readr包的write_lines
readr包的IO函数同样基于C++开发，针对矢量化输入做了优化，不需要转换格式就能直接写入字符向量，代码更简洁：

  library(readr)
  write_lines(your_char_vector, "output.txt")
  

  它的速度和fwrite方案不相上下，而且不需要额外的格式转换步骤。

• 二进制模式下使用writeLines
  基础R的writeLines如果用默认文本模式，会有换行符转换的额外开销，换成二进制模式能显著提升速度：

  # 打开二进制写入连接
  con <- file("output.txt", "wb")
  writeLines(your_char_vector, con)
  close(con)
  

  这个方案不需要额外安装包，适合不想引入依赖的场景，但速度略逊于前两种。

额外提示 #

• 尽量避免分块写入大向量，一次性写入的IO效率更高；
• 如果你的字符向量中包含特殊换行符（比如\r\n），提前统一处理成系统兼容的换行符，避免写入时出现格式问题。

内容的提问来源于stack exchange，提问作者Walker in the City