facebook APIを使用したhttrパッケージのoauth2.0_token関数の使用方法は？

Question

私はhttrパッケージに依存しているfacebook関数のコレクションを持っています。

通常の手順では、oauthアプリの仕様とFacebookのエンドポイントを設定する必要があります。最近まで、これは魅力のように働いたが、私はoauth2.0_token機能によってトークンを取得しようとすると、今私はエラーを取得する：

Waiting for authentication in browser... Press Esc/Ctrl + C to abort Authentication complete. Fejl i init_oauth2.0(self$endpoint, self$app, scope = self$params$scope, : Bad Request (HTTP 400).

あなたは以下の私のコードを参照してください。

facebook_app <- oauth_app("facebook", key = "XXXX", secret = "YYYY") 
    # end point 
    facebook_ep <- oauth_endpoint(
    authorize = "https://www.facebook.com/dialog/oauth", 
    access = "https://graph.facebook.com/oauth/access_token") 
    # token from endpoint and oauth 
    fb.token <- oauth2.0_token(facebook_ep, facebook_app, user_params = facebook_ep) 

を私がされていますいろいろなポストやフォーラムに行きましたが、私はまだ解決策を見つけることができませんでした。 setttingが解決しよう

Answer 1

：

Sys.setenv("HTTR_SERVER_PORT" = "1410/") 

を