使用R生成OAuth令牌

Question

新手-首次尝试通过API提取数据并使用R.

我获得了API密钥和秘密。

已转换为base64。

现在困惑于下一步，我收到的指示说我应该"；在头和请求体中输入生成的base64值，并调用令牌URI，如下所示；

[代码]授权：基本｛base64value｝内容类型：application/x-www-form-urlencoded岗位https://api.destination.com/oauth/tokengrant_type=客户端凭据[/Code]

关于R是否可以用于获取OAuth令牌，有什么见解吗？

如果是，我需要安装哪些软件包？

具体步骤是什么？

目前正在阅读几本关于R的书，但认为有人能够提供一些见解。

提前谢谢。

Answer 1

httr软件包是开始学习R中API的好地方。如果您还没有在那里取得领先，我强烈建议您花点时间去看看。

library(httr)
base64_value <- your_generated_base64string
response <- 
POST(url = "https://api.precisely.com/oauth/token",
add_headers(Authorization = paste("Basic", base64_value))
body = list(grant_type = "client_credentials"),
encode = "form")
# we're hoping this is 200
response$status

Answer 2

以下代码不起作用。结果是状态代码401。

在尝试了无数次之后，也许我需要再次重新生成另一个密钥和秘密。然后，获得另一个base64值。然后，再试一次。其他选项包括尝试Rcurl，甚至尝试Python。

我假设服务器在多次尝试失败后最终锁定了base64值。

感谢时间/洞察力。

如有任何其他见解，我们将不胜感激。

library(httr)
base64_value <-
"123456789="

response14 <-
httr::POST (url = "https://api.precisely.com/oauth/token",
httr::add_headers(Authorization = paste("Basic", base64_value)),
body = list(grant_type = "client_credentials"),
encode = "form"
)

Answer 3

最新迭代。

收到的错误与超时有关。

library(httr)
base64_value <-
"123456789="

response14 <-
httr::POST (url = "https://api.precisely.com/oauth/token",
httr::add_headers(Authorization = paste("Basic", "123456789=")),
body = list(grant_type = "client_credentials"),
encode = "form"
)

curl:：curl_fetch_memory(url，handle=handle(中出错：达到超时：[api.correct.com]解析在 10000毫秒后超时