(R) Создание токена oauth 1.0 для Flickr с использованием httr - PullRequest
0 голосов
/ 08 мая 2020

Я пытаюсь сгенерировать токен доступа для своего приложения Flickr в httr. Моя цель - загрузить изображения с определенных географических координат. Насколько я понимаю, это не то, что может сделать пакет FlickrAPI, поэтому я решил использовать httr.

Выполнение приведенного ниже кода вызывает страницу авторизации, но когда я отправляю авторизацию, я получаю ошибку localhost ( localhost неожиданно закрыл соединение).

Что я здесь забыл? Я не установил URL-адрес обратного вызова, если это необходимо.

library(httr)

setwd("G:\\Project\\R Code\\")

api_key <- "<TOKEN>"
secret <- "<SECRET>"

flickr.app <- oauth_app("App Name", api_key, secret)

flickr.endpoint <- oauth_endpoint(
  request = "https://www.flickr.com/services/oauth/request_token",
  authorize = "https://www.flickr.com/services/oauth/authorize",
  access = "https://www.flickr.com/services/oauth/access_token"
)

token <- oauth1.0_token(
  flickr.endpoint,
  flickr.app,
  cache = FALSE
) 
...