Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/68.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

Warning: file_get_contents(/data/phpspider/zhask/data//catemap/9/loops/2.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_Loops_Rstudio - Fatal编程技术网

R循环引用多个数据帧

R循环引用多个数据帧,r,loops,rstudio,R,Loops,Rstudio,我试图创建一个循环,从R中的多个数据帧中提取数据,然后将它们rbind到一个数据帧中。 数据帧的名称都相同,并在末尾附加一个增量(split1、split2、split3…)以区分 每个数据帧都包含一个数字列表,我希望将其附加到URL 到目前为止,我构建的循环如下所示: requester_url <- "https://example.url/users/show_many/ids=" for(i in 1:7 { splitname <- paste0('split',i)

我试图创建一个循环,从R中的多个数据帧中提取数据,然后将它们rbind到一个数据帧中。 数据帧的名称都相同,并在末尾附加一个增量(split1、split2、split3…)以区分

每个数据帧都包含一个数字列表,我希望将其附加到URL

到目前为止,我构建的循环如下所示:

requester_url <- "https://example.url/users/show_many/ids="
for(i in 1:7 {
  splitname <- paste0('split',i)
  requester_ids <- paste0(splitname, collapse = ",")
  requester_url <-paste0(requester_url,requester_ids)
}

requester\u url正如您所指出的,问题是使用了表的名称字符串,而不是表本身。您只需要“获取”即可使代码正常工作

split1 <- 100:109
split2 <- 200:209
split3 <- 300:309
split4 <- 400:409
split5 <- 500:509
split6 <- 600:609
split7 <- 700:709
requester_url <- "https://example.url/users/show_many/ids="
for(i in 1:7) {
  splitname <- paste0('split',i)
  requester_ids <- paste0(get(splitname), collapse = ",")
  if (i>1) sep <- ',' else sep <- ''
  requester_url <- paste(requester_url,requester_ids,sep=sep)
}

split1
splitname这是一个很好的观点。你有没有建议我如何修改我的循环以使其按预期工作?这非常有效,但是我调整了if语句以满足我的需要。为了澄清为什么我要使用几个数据集,我正在使用的API限制为100条记录,所以这7个数据集实际上是从一个更大的数据集中分离出来的。对于这个特定的API调用,没有分页,因此需要使用拆分数据集进行多个调用。
requester_ids <- paste0(splitname, collapse = ",")
split1 <- 100:109
split2 <- 200:209
split3 <- 300:309
split4 <- 400:409
split5 <- 500:509
split6 <- 600:609
split7 <- 700:709
requester_url <- "https://example.url/users/show_many/ids="
for(i in 1:7) {
  splitname <- paste0('split',i)
  requester_ids <- paste0(get(splitname), collapse = ",")
  if (i>1) sep <- ',' else sep <- ''
  requester_url <- paste(requester_url,requester_ids,sep=sep)
}