w=12

f=function(y){
d=8
 h=function(){
 return(d*(w+y))
 }
 return(h())

> environment(f)   #environment函数用于获取对象所在的环境
<environment: R_GlobalEnv> 　　 #R_GlobalEnv表示为顶层环境

函数中的参数作为局部变量

在局部变量中未找到的对象，将在顶层环境中寻找

R语言环境和变量的作用域