odani

library(httr)

# these 4 parameters should be set
dcm_user_id <- DCM_USER_ID
report_id <- REPORT_ID
dcm_key <- KEY
secret <- SECRET

myapp <- oauth_app("google", key = dcm_key, secret = secret)
google_token <- oauth2.0_token(oauth_endpoints("google"), myapp, scope = "https://www.googleapis.com/auth/dfareporting")