r - 如何调试他们通过 eval 等调用的函数

Question

我不知道如何调试结构，例如：

fun1 <- function(obj){
   a<-c(obj,4)
   c(a,5)
}

fun <- function(obj){
   a <- match.call()
   a[[1L]] <- fun1
   return(eval.parent(a))
}

我想知道如何指示调试模式跟随调用eval.parent(a)并跳转到fun1.

Answer 1

根据调试帮助页面：“如果您想调试一个不是从一开始就开始的函数，请使用trace(..., at = *)or setBreakpoint。”

> trace(eval.parent)

> fun(4)
trace: eval.parent(a)
[1] 4 4 5

或者您可能想发出警告并使用它来触发浏览器。在这一点上很难说你在期待什么。