使用RedditExtractoR包获取用户内容时遇错误，如何跳过无效用户？

直接批量调用get_user_content会因单个无效用户中断执行，要实现自动跳过无效用户，核心思路是逐个遍历用户列表，用错误捕获机制处理单个用户的请求失败情况，具体实现代码如下：

# 定义你的500位用户列表
user_list <- c("User1", "User2", ..., "UserN")
# 初始化空列表，用于存储有效用户的返回数据
valid_user_data <- list()

# 遍历每个用户，捕获错误并跳过无效用户
for (user in user_list) {
  # 用tryCatch捕获请求过程中的错误
  user_result <- tryCatch(
    expr = {
      # 尝试获取当前用户的内容
      get_user_content(user)
    },
    error = function(e) {
      # 打印错误提示（可选，用于记录哪些用户出错）
      message(paste("跳过用户", user, "：", e$message))
      # 返回NULL，后续过滤掉无效结果
      NULL
    }
  )
  
  # 仅将有效结果存入列表
  if (!is.null(user_result)) {
    valid_user_data[[user]] <- user_result
  }
  
  # 可选：添加请求延迟，避免触发Reddit API频率限制
  Sys.sleep(1)
}

# （可选）将列表格式的结果合并为数据框
# valid_user_df <- do.call(rbind, valid_user_data)

关键说明 #

• tryCatch是R中处理错误的核心函数，当get_user_content调用失败（比如用户不存在、403禁止访问）时，会执行error分支的代码，跳过当前用户并继续循环。
• 加入Sys.sleep(1)是为了控制请求频率，符合Reddit API的使用规范，避免因频繁请求被限制访问。
• 如果遇到大量403错误，可在代码开头设置自定义用户代理，示例：

  options(HTTPUserAgent = "MyRedditScraper/1.0 (联系邮箱@xxx.com)")
  

  这是Reddit API要求的规范，能降低被拦截的概率。

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