Подключение к Facebook API - PullRequest
Новая
       12

Подключение к Facebook API

0 голосов
/ 27 марта 2020

Я сталкиваюсь с этой проблемой при подключении к API Facebook с помощью пакета httr, при тестировании на узле 'me' у меня возникла следующая проблема. У меня сложилось впечатление, что мне узел не требует специальных разрешений. Тестирование в браузере с 'https://graph.facebook.com/me' дало те же результаты, было бы здорово, если бы кто-то мог дать объяснение. 

# Define keys
app_id = 'my_app_id'
app_secret = 'my_app_secret'

# Define the app
fb_app <- oauth_app(appname = "facebook",
                    key = app_id,
                    secret = app_secret)

# Get OAuth user access token
fb_token <- oauth2.0_token(oauth_endpoints("facebook"),
                           fb_app,
                           scope = 'public_profile',
                           type = "application/x-www-form-urlencoded",
                           cache = TRUE)

response <- GET("https://graph.facebook.com",
                path = "/me",
                config = config(token = fb_token))



# Show content returned
content(response)

$error
$error$message
[1] "An active access token must be used to query information about the current user."

$error$type
[1] "OAuthException"

$error$code
[1] 2500

$error$fbtrace_id
[1] "ARRnb93rZHmWLlXK_MMJlfi"

Отметив, что я подписал в использовании приложения.

...