我在R version 1.1.442
中运行此代码没有任何错误,但在1.1.453
的新版本中,此代码抛出了多个错误,如Error in init
和error in get report data
。同样在新版本中library(RGoogleAnalytics)
被RGoogleAnalyticsPremium
取代
library(RGoogleAnalytics)
library(RGA)
library(RCurl)
client.id="xxxxxxxx-ts4sbtvss5bm1dv6864i8jtkng4tqmtp.apps.googleusercontent.com"
client.secret="xxxxxxx"
token<-Auth(client.id,client.secret)
save(token,file="./token_file")
ValidateToken(token)
query.list <- Init(start.date = "2018-05-01",
end.date = "2018-05-05",
dimensions = c("ga:dimension32","ga:sourcemedium","ga:eventCategory","ga:eventAction"),
metrics = c("ga:sessions","ga:goal6Completions","ga:users"),
max.results = 20000,
sort = "ga:sessions",
filters=c("ga:sourcemedium=~organic;ga:eventCategory=~page_navigation,ga:eventAction=~submitted_crf"),
table.id = "ga:169730504")
ga.query <- QueryBuilder(query.list)
ga.data <- GetReportData(ga.query, token,paginate_query = T)
任何帮助将不胜感激
在新库中没有max.results = 20000和table.id =“ga:169730504”,删除它们时它应该有效。然后使用GetFile而不是GetReportData。我还没有成功获得这些数据,如果您成功,请与我分享您的代码。