0

我有一个使用 Instagram API 的 Shiny 应用程序,并且需要访问令牌。在本地运行时,我可以使用

full_url <-oauth_callback()
full_url <- gsub("(.*localhost:[0-9]{1,5}/).*", x=full_url, replacement="\\1")
print(full_url)

获取回调 url 以注册 Instagram。部署我的应用程序后,我将如何获取此 url?

此外,这可能是相关的,当部署应用程序时,我收到一个错误:

Error : oauth_listener() needs an interactive environment

我从不明确使用 oauth_listener(),所以我不知道如何解决这个问题。我所有的 oauth 相关代码如下:

  instagram <- oauth_endpoint(
    authorize="https://api.instagram.com/oauth/authorize",
    access="https://api.instagram.com/oauth/access_token",)
  my_app <- oauth_app(app_name, client_id, client_secret)
  ig_oauth <- oauth2.0_token(instagram, my_app, scope="basic",  type="application/x-www-form-urlencoded", cache=FALSE)
4

0 回答 0