R语言自定义函数调用后未在全局环境生成new_data的问题

R遵循词法作用域规则，函数运行时会生成独立的临时执行环境，函数内部用<-创建的所有变量默认仅存在于这个临时环境中，函数运行结束后临时环境会自动销毁，内部变量不会同步写入你日常操作的全局工作环境。
你当前的代码调用func(iris)时，确实在函数内部生成了new_data对象，也通过return(new_data)把数据框内容返回了，但你调用函数时没有把返回值赋值给全局环境的变量，返回的内容只会直接打印在控制台，不会被保存，自然在全局环境里找不到new_data。
你单独执行new_data <- iris能成功创建对象，是因为这句赋值语句直接运行在全局环境中，赋值结果会直接保存在全局环境里，和函数内部的赋值逻辑完全不在同一个环境层级。

• 推荐写法（符合R编码最佳实践，不破坏函数封装性）：调用函数时，将函数返回值显式赋值给全局环境的目标变量即可，代码如下：

func <- function(data) {
  new_data <- data
  return(new_data)
}
# 调用时接收返回值赋值
new_data <- func(iris)

执行完上述代码后，你就能在全局环境中找到new_data数据框。

• 不推荐写法（易造成逻辑混乱，非特殊场景不要用）：如果要强制在函数内部向全局环境写入变量，可以使用超赋值运算符<<-，但这种写法会打破函数的封闭性，后续代码排查变量来源会非常麻烦：

func <- function(data) {
  # <<- 会直接向上层环境查找变量并赋值，最上层就是全局环境
  new_data <<- data
}
func(iris)

提示：R的函数设计默认是“无副作用”的，也就是函数内部运算不会主动修改外部环境的对象，所有需要外部使用的结果都通过返回值输出，外部显式赋值接收，这种写法代码逻辑最清晰，后期维护成本最低。

内容的提问来源于stack exchange，提问作者Bill Knowlton