在R发生错误后获取变量的状态 [英] Getting the state of variables after an error occurs in R

问题描述

假设我刚刚调用了一个函数， f ，并在函数的某处发生错误。我只想在错误发生之前检查不同变量的值。

假设我的直觉告诉我这是一个小错误，所以我太懒了，不能使用 debug（f）并且也懒得将 browser（）插入函数的一部分，我认为事情会出错。而且我太懒了，开始放入 print（）语句。

这里有一个例子： p>

  x<  -  1：5 
y<  -  x + rnorm（length（x），0,1）
f<  -  function（x，y）{
y<  -  c（y，1）
 lm（y〜x）
} 
  

调用 f（x，y）我们得到以下错误：

  model.frame.default中的错误（formula = y〜x，drop.unused.levels = TRUE）：
可变长度不同（找到'x'）
  

在这个例子中，我想在之前抓住环境的状态 lm（）被调用;这样我可以调用 x 和 y ，看看它们的长度是不同的。 （这个例子可能太简单了，但我希望它可以得到这个想法。）

解决方案

正如这里，有一个简单的方法来做到这一点，我认为这个招数有可能更好地改变生活。

首先，调用：

  options（error = recover）
  

现在，当我们调用 f （x，y）我们将有一个选项来选择要恢复的环境。在这里，我选择了选项1，它打开一个调试器，让我可以在 lm（）调用之前玩变量。

 > f（x，y）
 model.frame.default中的错误（formula = y〜x，drop.unused.levels = TRUE）：
可变长度不同（发现'x'）
 
输入一个帧号，或者0退出
 
 1：f（x，y）
 2：lm（y〜x）
 3：eval mf，parent.frame（））
 4：eval（expr，envir，enclosure）
 5：model.frame（formula = y〜x，drop.unused.levels = TRUE）
 6：model.frame.default（formula = y〜x，drop.unused.levels = TRUE）
 
选择：1 
调用方式：eval（expr，envir，enclosure）
浏览[1]> x 
 [1] 1 2 3 4 5 
浏览[1]> y 
 [1] 1.6591197 0.5939368 4.3371049 4.4754027 5.9862130 1.0000000 
  

Let's say I have just called a function, f, and an error occurred somewhere in the function. I just want to be able to check out the values of different variables right before the error occurred.

Suppose my gut tells me it's a small bug, so I'm too lazy to use debug(f) and too lazy to insert browser() into the part of the function where I think things are going wrong. And I'm far too lazy to start putting in print() statements.

Here's an example:

x <- 1:5
y <- x + rnorm(length(x),0,1)
f <- function(x,y) {
  y <- c(y,1)
  lm(y~x)
}

Calling f(x,y) we get the following error:

Error in model.frame.default(formula = y ~ x, drop.unused.levels = TRUE) : 
  variable lengths differ (found for 'x')

In this example, I want grab the state of the environment just before lm() is called; that way I can call x and y and see that their lengths are different. (This example may be too simple, but I hope it gets the idea across.)

解决方案

As pointed out here, there's an easy way to do this, and I think this trick has the potential to change lives for the better.

First, call this:

options(error=recover)

Now when we call f(x,y) we will have an option to choose an environment to recover. Here I select option 1, which opens up a debugger and lets me play around with variables just before lm() is called.

> f(x,y)
Error in model.frame.default(formula = y ~ x, drop.unused.levels = TRUE) : 
  variable lengths differ (found for 'x')

Enter a frame number, or 0 to exit   

1: f(x, y)
2: lm(y ~ x)
3: eval(mf, parent.frame())
4: eval(expr, envir, enclos)
5: model.frame(formula = y ~ x, drop.unused.levels = TRUE)
6: model.frame.default(formula = y ~ x, drop.unused.levels = TRUE)

Selection: 1
Called from: eval(expr, envir, enclos)
Browse[1]> x
[1] 1 2 3 4 5
Browse[1]> y
[1] 1.6591197 0.5939368 4.3371049 4.4754027 5.9862130 1.0000000

这篇关于在R发生错误后获取变量的状态的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！