非Rgui环境下创建含多类信息的R会话日志文件方案咨询

方法1：使用script()命令行工具（推荐） #

这是最接近RStudio控制台效果的方案，能完整记录输入命令、输出结果、警告和错误，无需额外配置：

• 启动R时直接指定日志文件：

  R --script logfile.txt
  

  所有会话中的输入输出都会自动写入logfile.txt，退出R后即可查看。
• 若已进入R会话，可调用内置的script()函数开启记录：

  script("logfile.txt")  # 开始记录
  # 执行你的R命令，比如：
  x <- 1:10
  mean(x)
  warning("这是一个测试警告")
  stop("这是一个测试错误")
  script()  # 停止记录
  

方法2：自定义sink()组合方案 #

普通sink()仅捕获输出，需结合命令记录实现完整日志：

1. 先创建日志文件，同时重定向标准输出和错误输出：

   log_con <- file("session_log.txt", open = "wt")
   sink(log_con, type = "output")
   sink(log_con, type = "message")
   

2. 自定义命令记录函数，手动捕获输入的命令：

   log_command <- function(cmd) {
     cat(paste0("> ", cmd, "\n"), file = log_con, append = TRUE)
     eval(parse(text = cmd))
   }
   

3. 使用该函数执行命令，即可同时记录命令和结果：

   log_command("x <- 1:5")
   log_command("sum(x)")
   log_command("warning('测试警告')")
   

4. 结束记录时恢复默认输出：

   sink(type = "message")
   sink(type = "output")
   close(log_con)
   

方法3：使用logging包实现分级日志 #

适合需要精细化管理日志类型的场景：

1. 安装并加载包：

   install.packages("logging")
   library(logging)
   

2. 配置日志同时输出到文件和控制台：

   basicConfig()
   addHandler(writeToFile, file = "detailed_log.txt", level = "DEBUG")
   

3. 使用不同级别函数记录信息：

   loginfo("执行数据加载")
   x <- read.csv("data.csv")
   logwarn("数据列数异常")
   logerror("文件读取失败")
   

   日志文件会自动标记级别，方便后续筛选查看。

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