Tell me, what am I doing wrong?
sample code:
Ads = Table.AddColumn(
Groups, "GA_ads_data", each try R.Execute("
setwd('" & AccessPath & "')
library('RGA')
client_id <- '" & ClientId & "'
client_secret <- '" & ClientSecret & "'
profile_id <- '" & [ids] & "'
rga_auth <- authorize(
client.secret = client_secret
)
gaData <- get_ga(
profileId = profile_id,
start.date = '" & BegDate & "',
end.date = '" & EndDate & "',
dimensions = 'ga:date,ga:adwordsCriteriaID,ga:adDistributionNetwork,ga:adwordsAdGroupID,ga:adwordsCreativeID,ga:keyword',
metrics = 'ga:adCost',
samplingLevel = 'HIGHER_PRECISION',
max.results = 15000,
token = rga_auth
)
"){[Name="gaData"]}[Value] otherwise null
)
Received by adwordsCriteriaID: 21659804743, 503999, ...
Tell me what to do.