Hi Ernest,
To start: I don't see an attachment, I think they're not (always) allowed on
this mailing-list. If you want to send something, text is your safest bet.
But regarding the issue of tryCatch: I think you're not fully using what it
already can do. In almost all circumstances I've encountered the following
works fine:
res <- tryCatch(expr, error = function(cond) {
# a bunch of code
# Some value to be stored in res
})
The only difference is that now "#abunchofcode" is run from inside a function,
which means you're working in a different environment, and if you want to
assign values to other variables you need to use <<- or assign.
For a modified function, I think it would be nice if there's a way to supply an
expression instead of a function, so that evaluation (and assignment!) takes
place in the same environment as the main code in the tryCatch (in expr). Is
that what you made?
And with the current tryCatch, you could use something like this:
res <- tryCatch(expr, error=function(e) evalq({
# a bunch of code
# Some value for res
}, envir=parent.frame(4))) # The 4 is because some internal functions are
involved, parent.frame(4) is the same environment as used by expr
Although this is cumbersome, and it gets even more cumbersome if you want to
access the error-object in #abunchofcode, or use #abunchofcode to return to a
higher level, so I get it you're looking for a more elegant solution.
Best regards,
Emil Bode
On 23/11/2018, 08:49, "R-devel on behalf of Ernest Benedito"
<r-devel-boun...@r-project.org on behalf of ebenedi...@gmail.com> wrote:
Hi everyone,
When dealing with errors, sometimes I want to run a bunch of code when an
error occurs.
For now I usually use a structure such as:
res <- tryCatch(expr, error = function(cond) cond) # or try(expr)
if (inherits(res, “error”)) # or inherits(res, “try-error”)
# a bunch of code
I though it would be useful to have a function that does this naturally, so
I came up with the attached function.
I would be glad to hear your insights and if you think it would make sense
to add this function to R.
Best regards,
Ernest
______________________________________________
R-devel@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel
______________________________________________
R-devel@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel
