如何使用rbind将批量生成的非永久向量合并为Data Frame？

你的核心问题在于之前的循环每次都覆盖了web_id变量，导致最终只保留了最后一个向量的结果。我们可以通过先收集所有目标向量到列表，再一次性合并的方式解决这个问题，同时还能优化你的代码写法，避免零散变量的混乱。

方法一：合并已生成的零散向量 #

如果你已经用assign生成了一堆web_idxxx格式的变量，可以按以下步骤合并：

1. 生成所有目标变量的名称列表：

vec_names <- paste0("web_id", campaign_id)

2. 用lapply获取每个变量对应的向量，存入列表：

vec_list <- lapply(vec_names, get)

这里的get()函数可以把字符串格式的变量名转换成实际的变量对象。

3. 一次性合并列表中的所有向量为DataFrame：

web_id_df <- do.call(rbind, vec_list)
# 可选：为数据框设置列名（根据你的向量内容调整）
colnames(web_id_df) <- c("campaign_id", "target_value")

方法二：更优写法——生成向量时直接存入列表（推荐） #

用assign创建大量零散变量会让工作环境变得混乱，后续处理也容易出错。推荐你在生成向量的阶段就直接存入列表，代码更整洁高效：

修改你的生成循环：

# 初始化一个空列表用于存储向量
vec_list <- list()

for (i in campaign_id) {
  h <- basicHeaderGatherer()
  doc <- getURI(
    paste0(automations_url, "/", i, "?apikey=", accessToken, "&count=", pagination),
    headerfunction = h$update
  )
  # 生成向量后直接存入列表，用带前缀的名称作为列表元素名
  vec_list[[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
    ))
  )
}

# 合并列表为DataFrame
web_id_df <- do.call(rbind, vec_list)

为什么你的原循环无效？ #

你原来的循环中，每次执行web_id <- do.call("rbind",list(paste0('web_id',i)))都是将当前单个向量转成数据框并覆盖web_id变量，循环结束后自然只保留了最后一次的结果，而非累积合并所有向量。

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