Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/65.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R分配为数据帧和列表_R - Fatal编程技术网

R分配为数据帧和列表

R分配为数据帧和列表,r,R,我在循环一个带前缀的向量。我在循环中根据前缀分配数据帧,我想将它们添加到列表中 ## option 1 diff_list <- setNames(rep(list(data.frame()), length(prefix)), paste0(prefix, "_diff_tbl")) 这是我的密码。它可以初始化数据帧,并且它们也可以得到正确的名称。但是我怎样才能把它们添加到列表中呢 prefix = c("green", "red&qu

我在循环一个带前缀的向量。我在循环中根据前缀分配数据帧,我想将它们添加到列表中

## option 1
diff_list <- setNames(rep(list(data.frame()), length(prefix)), paste0(prefix, "_diff_tbl"))
这是我的密码。它可以初始化数据帧,并且它们也可以得到正确的名称。但是我怎样才能把它们添加到列表中呢

prefix = c("green", "red", "orange")

diff_list = list()
for (i in 1:length(prefix)) {
      tmp_name = paste(prefix[i], "_diff_tbl", sep = "")
      assign(tmp_name, data.frame())
      diff_list[prefix[i]] = ???
}

我不确定下面的代码是否达到了您的目标

diff_list <- setNames(lapply(prefix,function(x) data.frame()),paste(prefix,"_diff_tbl", sep = ""))
您可以使用
rep()
replicate()
多次复制对象并将其存储到列表中

## option 1
diff_list <- setNames(rep(list(data.frame()), length(prefix)), paste0(prefix, "_diff_tbl"))
##选项1

diff_list您正在寻找以下内容:
for(i in 1:length(prefix)){diff_list[i]=data.frame(粘贴(prefix[i],“_diff_tbl”,sep=”“)}
您可以使用此代码生成一个空数据帧列表,其中
prefix
作为diff_list的名称
## option 2
diff_list <- setNames(replicate(length(prefix), data.frame()), paste0(prefix, "_diff_tbl"))