API объявлений Twitter в R - PullRequest
Новая
       10

API объявлений Twitter в R

0 голосов
/ 19 декабря 2018

У меня есть следующее:

App Name API_Key API_Secret Access_Token Access_Secret Account ID

Я хочу просто получать показатели эффективности по дням для всех кампаний с одним идентификатором аккаунта в объявлениях Twitter.

library(twitteR)
library(ROAuth)
library(RCurl)
library(parsedate)
library(BBmisc)
library(httr)

appname <- “xxxxx”
api_key <- “xxxxxxx”
api_secret <- “xxxxxxxx”
access_token <- “xxxxxxx”
access_secret <- “xxxxxx”
account_id <- “xxxxxxx”

setup_twitter_oauth(api_key,api_secret, access_token, access_secret)

reach_campaign.request <- 
GET(“https://ads-api.twitter.com/1/stats/accounts/xxxxxxx/reach/campaigns?start_time=2018-06-10T00:00:00+01:00Z&campaign_ids=xxxxx&end_time=2018-06-15T00:00:00+01:00Z 7”,
query = list(granularity = “DAY”,
metric_groups = “ENGAGEMENT”,
placement = “ALL_ON_TWITTER”),
accept_json(),
config(token = access_secret))

Кто-нибудь знает, как просто получить результаты по дням для идентификатора учетной записи в целом?

Это была моя попытка, но я получил ошибку 403: 

path <- paste("https://ads-api.twitter.com/1/stats/accounts/", account_id, sep="")
getinfo <- GET(path)
newContent <- jsonlite::fromJSON(toJSON(content(getinfo)))
...