嵌套函數：「錯誤：無法找到嵌套函數」

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) 


}