嵌套函数：“错误：无法找到嵌套函数”

Question

我定义已嵌套函数的函数，如下所示：

afunc <- function(p1, p2) { 

for loop { 
    f = bfunc(p1) 
} 
g = cfunc(p2) 

bfunc <- function(p3) { 
    ... 
} 

cfunc <-function(p4){ 
    ... 
} 

} 

出于某种原因，我得到“错误：找不到功能“bfunc””。我在这里错过了什么吗？提前致谢。

Answer 1

你需要它，在那里执行之前，你的函数定义移动到：

afunc <- function(p1, p2) { 
bfunc <- function(p3) { 
    ... 
} 

cfunc <-function(p4){ 
    ... 
} 

for loop { 
    f = bfunc(p1) 
} 
g = cfunc(p2) 


}