Я выполнял этот код без ошибок до сих пор в 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)
Любая помощь будет оценена