通过循环将谷歌趋势数据下载到R中

Question

我需要从Google趋势中下载搜索量以获得多个字词。之后我想将文件保存为csv。

我尝试了以下内容：

单词＆lt; -c（“网球”，“Fußball”，“手球”） for（i in 1：length（words））{ 趋势＆lt; - gtrends（words [i]，geo =“DE”，start_date = as.Date（“2004-01-01”），end_date = as.Date（Sys.time（）））$ trend write.csv（trends，file =“trends.csv”） }

显然趋势中的数据会被覆盖，所以在这种情况下手球的最后一个字仍然存在。如何下载多个数据？

感谢您的帮助！

Ricarda

Answer 1

你可以这样试试：

library(gtrendsR)
# Switch https://www.google.com/settings/security/lesssecureapps to on if needed:
gconnect("username", "password")
words <-c("Tennis","Fußball", "Handball") 
trends<- gtrends(words, geo="DE",start_date = as.Date("2004-01-01"), end_date = as.Date(Sys.time()))
for (word in tolower(words)) 
  write.csv( trends$trend[, c("start", "end", word)], paste0(word, ".csv") )

Answer 2

这样做。

write.csv(yourobject$tableframe, file= "filedir\\filename.csv") 

获取表格names(myobject)

然后你把它钉了下来。