とりあえず試行錯誤メモって感じで。やりたい事は関数h内のxの値をf内から変更するって話。 x <- 1:3 g <- function() { f <- function(){x <<- 10} h(f) } h <- function(f) { x <- 1 print(x) f() print(x) } これを実行すると > g() [1] 1 [1] 1 > x [1] …