我想将所有控制台文字重定向到一个文件中。这是我尝试过的：
> sink("test.log", type=c("output", "message"))
> a <- "a"
> a
> How come I do not see this in log
Error: unexpected symbol in "How come"
以下是我在test.log中找到的内容：
[1] "a"
以下是我想在test.log中得到的内容：
> a <- "a"
> a
[1] "a"
> How come I do not see this in log
Error: unexpected symbol in "How come"
我做错了什么？谢谢！
1:5 + 1:3 # prints and gives a warning
stop("foo") # an error
并在提示符处：
con <- file("test.log")
sink(con, append=TRUE)
sink(con, append=TRUE, type="message")
# This will echo all input and not truncate 150+ character lines...
source("script.R", echo=TRUE, max.deparse.length=10000)
# Restore output to console
sink()
sink(type="message")
# And look at the log...
cat(readLines("test.log"), sep="\n")
1:5 + 1:3，然后是它的输出，然后是下一个，等等。我要生成这种类型的日志的原因是，我有一个需要30多GB RAM才能运行的程序。我在亚马逊云中运行它，并将回归分析的输出保存到各个文件中。通过查看日志，我希望能够快速找到生成每个文件的代码。注意：如果只是剪切并粘贴控制台输出，那就可以了。 - user443854max.deparse.length 参数。我已更新答案。 - Tommysource函数中使用echo=TRUE来记住输出。 - JuanPablo== script.R内容的开始 ==
== script.R内容的开始 ==
a <- "a"
a
How come I do not see this in log
== script.R 结束内容 ==
在命令提示符下（在许多 unix 变体中为 "$"，在 windows 中为 "C:>"），运行
$ R CMD BATCH script.R &
结尾的"&"是可选的，可以将命令在后台运行。 log文件的默认名称为扩展名加上"out"，即script.Rout。
== script.Rout内容开始 ==
R version 3.1.0 (2014-04-10) -- "Spring Dance"
Copyright (C) 2014 The R Foundation for Statistical Computing
Platform: i686-pc-linux-gnu (32-bit)
R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.
Natural language support but running in an English locale
R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.
Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.
[Previously saved workspace restored]
> a <- "a"
> a
[1] "a"
> How come I do not see this in log
Error: unexpected symbol in "How come"
Execution halted
== 脚本 script.Rout 的结束内容 ==
screen，因此对我来说隐藏进程（使用结尾的&）并不是必需的。但即使没有&，我也无法再在控制台上获得任何输出。有可能同时获得控制台输出和xy.Rout中的日志吗？ - Honeybeartest.sh
#!/bin/bash
# this is a bash script
echo "Hello World, this is bash"
test1=$(echo "This is a test")
echo "Here is some R code:"
Rscript --slave --no-save --no-restore - "$test1" <<EOF
## R code
cat("\nHello World, this is R\n")
args <- commandArgs(TRUE)
bash_message<-args[1]
cat("\nThis is a message from bash:\n")
cat("\n",paste0(bash_message),"\n")
EOF
# end of script
当您运行脚本并将stderr和stdout都导向日志文件时：
$ chmod +x test.sh
$ ./test.sh
$ ./test.sh &>test.log
$ cat test.log
Hello World, this is bash
Here is some R code:
Hello World, this is R
This is a message from bash:
This is a test
对于这个问题，另一个可以尝试的方法是将R heredoc中的stdout和stderr直接传输到日志文件中；虽然我还没有尝试过，但这也可能有效。
你不能这样做。最多只能使用 sink 来保存输出，使用 savehistory 来保存输入，或者使用外部工具，例如 script、screen 或 tmux。
你可以在运行 R 脚本时，将输出打印到文件并同时查看进度（或不查看）screen。
如果不使用 screen，请使用 R CMD BATCH yourscript.R & 并执行第四步。
将您的Rgui首选项设置为大量行，然后在适当的间隔时间戳并保存为文件。
要从控制台保存文本：运行分析，然后选择（Windows）“文件>保存到文件”。
If you want to get error messages saved in a file
zz <- file("Errors.txt", open="wt")
sink(zz, type="message")
the output will be:
Error in print(errr) : object 'errr' not found
Execution halted
This output will be saved in a file named Errors.txt
In case, you want printed values of console to a file you can use 'split' argument:
zz <- file("console.txt", open="wt")
sink(zz, split=TRUE)
print("cool")
print(errr)
output will be:
[1] "cool"
in console.txt file. So all your console output will be printed in a file named console.txt