ネストされた機能：「エラー：ネストされた関数が見つかりませんでした」

Question

私は次のような機能を、入れ子になった関数を定義しています：何らかの理由で

afunc <- function(p1, p2) { 

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

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

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

} 

を、私は「ERRORを取得しています：関数を見つけることができませんでした"bfunc" "私はここに何かを逃していますか前もって感謝します。

Answer 1

あなたはそれが実行される場所の前に、あなたの関数定義を移動する必要があります。

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

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

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


}