powered by
capture condition
capture_message(expr)capture_warning(expr)
capture_warning(expr)
# NOT RUN { 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)) # }
Run the code above in your browser using DataLab