r6 - R6 错误，当函数在函数中时

Question

library(R6) 
pre <- R6Class("pre",

public = list(
    dbl = NULL,
initialize = function(){},
functionA = function(){},
functionB = function() {}
) )

---

这是我想要的代码：

FunctionA ()
{
    FunctionB ()
}

但是这里有一个错误。

错误：找不到函数“functionB”

请让我知道如何解决它。

Answer 1

FunctionA = function()
{
  self$FunctionB ()
}    

应该做的伎俩。self除非您使您的类不可移植，否则必须放在成员函数的名称之前。这是一个完整的例子

library(R6) 
pre <- R6Class(public = list(
  functionA = function(){self$functionB()},
  functionB = function(){"output from B"}
))

obj <- pre$new()
obj$functionA()
# "output from B"
obj$functionB()
# "output from B"