如何在R中定期获取Google趋势数据

时间:2019-06-21 16:06:29

标签: r gtrendsr

我想每小时通过包“ gtrendsR”提取Google趋势数据,我试图使用Sys.sleep()函数设置计时器,但是,我每小时都无法下载它。因此,如何纠正我的代码以便每小时获取一次数据。另外,我想在excel文件中连续添加最新数据,而不是替换原始数据。非常感谢!

Sys.setlocale("LC_ALL", "English")
Keywords = c("google", "twitter")

for (k in Keywords) {
  res = NULL

  temp_1 <- gtrends(k, geo = "US",time = "all")
  temp_2 <- temp_1$interest_over_time
  res <- rbind(res, temp_2)
  rm(temp_1,temp_2)

  res <- select (res, c(date, hits))

  Sys.setlocale(category = "LC_ALL", locale = "cht")
  names(res)[2]<- k
  xfilepath = paste("C:/Users/Peter/Desktop/",k,".csv",sep="")
  write.csv(res, file = xfilepath, row.names=FALSE)

}

0 个答案:

没有答案