R语言如何将system2命令输出直接作为函数入参而非写入临时文件

核心原理 #

完全不需要落地临时文件，依靠system2的内置输出捕获能力、搭配R函数的内存文本输入能力，就可以全程在内存中完成命令输出的读取和解析，绕开不必要的磁盘IO。

大家最初尝试直接嵌套调用时容易踩两个坑：

1. 默认情况下system2会把命令输出直接打印到R控制台，自身仅返回命令的执行状态码（数字类型），根本拿不到实际的输出文本
2. 就算拿到了输出文本，read.table的file参数只接受文件路径、文件连接类型的输入，不接受裸的字符向量当文件路径用，因此直接把system2的返回值塞给file参数一定会报错

很多人不知道：system2的stdout参数除了传入本地文件路径，还可以设置为TRUE——此时函数会直接通过管道读取对应系统命令的标准输出，捕获为R环境中的字符向量，全程不会生成任何磁盘上的临时文件。

正确实现步骤 #

• 调用system2时显式设置stdout = TRUE，直接将命令输出捕获到内存中
• 把捕获到的字符向量，通过read.table的text参数传入，直接从内存文本完成解析

对应的基础示例代码：

# 直接捕获系统命令输出到内存，无临时文件生成
cmd_output <- system2('ls', args = c('-la'), stdout = TRUE)

# 直接从内存文本解析内容，无需关联本地文件
read.table(text = cmd_output)

如果需要一步完成嵌套调用，完全不需要中间变量：

read.table(text = system2('ls', args = c('-la'), stdout = TRUE))

优化注意点 #

• 如果需要排查命令执行异常，可以同时把stderr参数设为TRUE，将命令的错误输出也一并捕获，避免报错信息混入正常结果导致解析失败：

  # 同步捕获标准输出和错误输出
  cmd_full_result <- system2('ls', args = c('-la'), stdout = TRUE, stderr = TRUE)
  

• 这种全内存实现的方式比写临时文件的速度更快，也不存在临时文件残留、目标目录权限不足导致临时文件写入失败的问题。

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