我有以下要求
library(RCurl)
res=getURL("http://www.google.com/search?hl=en&lr=&ie=ISO-8859-1&q=RCurl&btnG=Search",
.opts=list(verbose = TRUE)
)
并希望捕获调用的详细输出(即,在 R 控制台中以红色打印的内容)。我认为输出行是消息,因此打印到stderr()
. 以下适用于消息
sink(textConnection("test","w"),type="message")
message("test message")
sink(stderr(),type="message")
test
#[1] "test message"
但如果我用上面给出message("test message")
的 RCurl 请求代替res=getURL(.....)
。显然,RCurl 的输出没有打印到stderr()
. 它也没有打印到stdout()
.
那么,如何捕获输出呢?
奖励问题:sink(stderr(),type="message")
将连接设置回 R 的默认值的正确方法是什么?
感谢您的帮助!