如何将R函数返回的DataFrame导入工作区？

你的函数逻辑本身是正确的，问题出在调用函数的赋值方式上。

正确的赋值方式 #

不要用new_dat <- return(df)这种错误写法，直接在调用函数时将返回值赋值给变量即可：

# 示例：假设缺失值编码为-99，原始数据框是dat
new_dat <- make_na(value = -99, df = dat)

执行后new_dat就是处理好的带NA的数据框，会被加载到工作区中。

为什么你的赋值方式无效 #

return(df)是函数内部用来返回结果的语句，不能直接在赋值语句里使用。当你调用make_na()时，函数已经通过return(df)把处理好的数据框返回出来，你只需要把这个返回结果直接赋值给变量就行。

可选的函数优化（非必须） #

如果想让函数更高效简洁，可以用lapply替代for循环，避免手动遍历变量名：

make_na <- function(value, df){
  df <- lapply(df, function(x){
    x[x == value] <- NA
    cat(paste0(names(x), " has ", sum(is.na(x)), " NA's\n"))
    x
  })
  as.data.frame(df)
}

这个版本和原函数功能完全一致，但处理大型数据框时效率更高，代码也更紧凑。

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