搜索昨天的推文

Question

我想编译一个数据集，其中包含几周内来自 Twitter 的推文。

为此，我必须保存每一天的推文并将它们保存到一个 csv 文件中（然后将它们合并到一个文件中）。我计划每天运行脚本并保存昨天的推文。

我使用 twitteR，在身份验证过程之后，我有以下代码：

# today is 2015-01-14
searchResults <- searchTwitter("#goodbyenukes", n=1500, since='2015-01-13', until='2015-01-13')

# save results in dataframe and csv
tweetsDf = ldply(searchResults, function(t) t$toDataFrame())
write.csv(tweetsDf, file="2015-01-13.csv")

我不想每天都修改脚本，以便获得昨天的推文。通过使用 Sys.Date() 我可以告诉 R 使用今天的日期。但是有没有办法告诉我用昨天的日期，这样我就不用每天都改脚本了？

Answer 1

我认为您可以使用 Sys.Date() - 1。欲了解更多信息：http://stat.ethz.ch/R-manual/R-devel/library/base/html/Ops.Date.html

尝试as.character将其转换为字符串，例如： searchResults <- searchTwitter("#goodbyenukes", n=1500, since=as.character(Sys.Date() - 1), until=as.character(Sys.Date() - 1 ))

搜索昨天的推文

Search yesterday's tweets

twitter

r