capture condition
1 2 3 | capture_message(expr)
capture_warning(expr)
|
1 2 3 4 5 6 7 8 9 10 11 | foom <- function(x) {
message("its too bad")
return(x)
}
capture_message(foom(4))
foow <- function(x) {
warning("its too bad")
return(x)
}
capture_warning(foow(4))
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.