使用rbind将非永久向量添加到数据帧

我有非永久向量，我喜欢把它们合并到一个数据帧中

我使用下面的循环来创建这些向量

for (i in campagin_id){
h <- basicHeaderGatherer()
doc <- getURI(paste0(automations_url,
                     "/",i,
                     "?apikey=",accessToken,
                     "&count=",pagination), headerfunction = h$update)

assign(paste0('web_id',i),c(i,as.integer(substring(h$value()[as.integer(grep(SearchTerm, h$value()))],
                             as.integer(regexpr(SearchTerm,h$value()[as.integer(grep(SearchTerm, h$value()))]))+nchar(SearchTerm)-1,as.integer(regexpr(SearchTerm,h$value()[as.integer(grep(SearchTerm, h$value()))]))+nchar(SearchTerm)+StringLength-2))))
}

问题是我不知道会得到多少向量，但我只知道向量名称的开头，所以我尝试运行以下循环

for (i in campagin_id) {
web_id <- do.call("rbind",list(paste0('web_id',i)))
}

for（我在campagin\u id中）{
web_id
do.call
是正确的想法，但是
rbind
是一个缓慢的操作。您应该一次一个地将向量添加到列表中，然后在最后执行一个
rbind
，类似这样的操作（显然，未经测试，因为示例不可复制，但它应该给出您的想法）：

result\u list=list（长度=长度（campagin\u id））
用于（我在坎帕金岛）{
h中有一个样式指南，其中包括大写字母，不包括“谢谢”
for (i in campagin_id) {
web_id <- do.call("rbind",list(paste0('web_id',i)))
}

result_list = list(length = length(campagin_id))
for (i in campagin_id) {
    h <- basicHeaderGatherer()
    doc <- getURI(
        paste0(
            automations_url,
            "/",
            i,
            "?apikey=",
            accessToken,
            "&count=",
            pagination
        ),
        headerfunction = h$update
    )

    result_list[[i]] = c(i, as.integer(
        substring(
            h$value()[as.integer(grep(SearchTerm, h$value()))],
            as.integer(regexpr(SearchTerm, h$value()[as.integer(grep(SearchTerm, h$value()))])) +
                nchar(SearchTerm) - 1,
            as.integer(regexpr(SearchTerm, h$value()[as.integer(grep(SearchTerm, h$value()))])) +
                nchar(SearchTerm) + StringLength - 2
        )
    ))
}

results = do.call(rbind, result_list)