【发布时间】:2019-04-19 03:26:34
【问题描述】:
我想从 R 控制台捕获所有输出。我尝试使用库“TeachingDemos”的 sink() 函数和 txtStart()。但是,它们都不能捕获 system() 命令的输出。
例如 如果我运行以下代码:
zz <- file("log.txt")
sink(zz)
sink(zz, type = "message")
print('first layer message!!!!')
system("Rscript test1.R") #test1.R is a R script that print 'hello world'
sink(type = "message")
sink()
我可以在 R 控制台中看到消息“hello world”。但是,我无法将其写入 log.txt。有没有办法解决这个问题?
谢谢
【问题讨论】:
-
system(..., intern=TRUE)(?system)