R devel - Aug 2006 - Capturing warnings with capture.output

Is there any way to include warnings in the output from capture.output?  eg:

a <- capture.output(warning("test"))
all.equal(a, "Warning message: \n test ")

Conceptually, this seems like redirecting stderr to stdout, or somehow
changing warning to simple print it's output.  I've had a look at
tryCatch and using a warning handler, but this terminates execution at
the warning.

Thanks,

Hadley

Something like this which displays the warnings and also writes
them to out so that they are captured:

out <- capture.output(
   withCallingHandlers({
	print(1)
	warning("A warning.")
	print(2)
	warning("Another warning.")
	print(3)
   }, warning = function(x) cat(x$message, "\n"))
)

print(out)


On 8/29/06, hadley wickham <h.wickham at gmail.com>
wrote:
> Is there any way to include warnings in the output from capture.output? 
eg:
>
> a <- capture.output(warning("test"))
> all.equal(a, "Warning message: \n test ")
>
> Conceptually, this seems like redirecting stderr to stdout, or somehow
> changing warning to simple print it's output.  I've had a look at
> tryCatch and using a warning handler, but this terminates execution at
> the warning.
>
> Thanks,
>
> Hadley
>
> ______________________________________________
> R-devel at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-devel
>