从R打印文本消息到pdf

Question

我正在通过一系列文件运行同一命令，当文件中存在异常功能时，这些命令会生成文本消息。我想在进行编码时将所有文本信息打印到一个pdf中。我尝试了以下类似的方法，但是没有用。请问有办法解决吗？我想查看print中的所有文本。

pdf("message.pdf")

for(j in 1:10000){
... # There are some checks to do beforehand
print("a") # This is the actual message
}

dev.off()

Answer 1

您可以使用cat和sink写入文本文件：

sink("path/to/file.txt")

for(j in seq(1e5)) {
    cat("My message", "\n")
}

sink()

或者，您可能希望“编织”一个Rmarkdown文件，并将代码放在代码块中，这是直接进入pdf的一种方法。