lapply中的赋值抛出错误。 [R]

Question

我尝试使用lapply向一堆数据集添加新列。但是我的代码引发了一个错误。

以下是我的代码

z <- data.frame(a=rep("z",20))

datasets_list <- list(z,z,z,z)

lapply(datasets_list, function(k){k$New_Column <<- NA})

但是，运行此命令会返回错误Error in k$New_Column <<- NA : object 'k' not found。

Answer 1

我们可以使用await Task.Run(() => { // Yor code here }); 创建新列

transform

如果我们需要更改全局环境中的数据集，请使用datasets_listN <- lapply(datasets_list, transform, New_Column = NA) （但最好将list2env保留在data.frame中。假设，data.frame对象是'df1'，'df2'，'df3'，'df4'

list

注意：这里OP使用相同的数据集'z'来显示示例。