# NOT RUN {
is_big <- function(x) {
if (x > 10) return(Ok(x))
Err("This is small!")
}
# If 'x' is greater than 10, the value will be printed.
# Otherwise, an error is returned.
print_big <- function(x) {
print(!is_big(x))
}
# }
Run the code above in your browser using DataLab