r - 从公司列表中,将推文流式传输到 df 中?
问题描述
从一个 txt 文档中,我将有一个公司列表,比如 Telstra、Optus 和三星。
将此列表导入 R 后,我需要一个循环来执行与下面的代码等效的操作。该列表可以是任意数量的公司,所以我的主要问题是它需要自动化。
df1 <- search_tweets2("Telstra", retryonratelimit = TRUE,include_rts=FALSE)
df2 <- search_tweets2("Optus", retryonratelimit = TRUE,include_rts=FALSE)
df3 <- search_tweets2("Samsung", retryonratelimit = TRUE,include_rts=FALSE)
谢谢。
解决方案
我们可以使用lapply
或 purrr 的map
函数来遍历每个公司名称。如果有很多公司要搜索使用Sys.sleep
以避免达到限制。
df <- data.frame(companies = c("Telstra", "Optus", "Samsung"))
result <- purrr::map_df(df$companies, ~{
search_tweets2(.x, retryonratelimit = TRUE,include_rts=FALSE)
#Sys.sleep(5)
}, .id = 'id')
推荐阅读
- sql - oracle12c,sql,count(*) 和 sum() 的区别
- ios - firebase.messaging() 导致 PWA 锁定在 IOS
- php - 在 minio 中存储数据(类似 S3 的系统)
- c# - 使用静态类来管理网络请求是否合理?
- javascript - 在 typescript 中设置 API 响应的接口
- sql - 将 SQLCMD 参数设置为 LinkedServer
- kubernetes - kubernetes imagePullPolicy:总是不自动拉取镜像
- android-studio - 如何解决这个 android studio 项目错误?
- php - 试图获取非对象的属性“图像”
- java - java中基于泛型类型的决策