r - 在 R 中为 API 使用 POST 时缺少参数

Question

我目前正在使用 POST 函数（包 httr）将一些文本提交到 API 以获取处理后的输出，我的代码编写如下。

url = "..."
client_id = "..."
client_secret = "..."
request_body = jsonlite::toJSON(list(src = c("吃饭")), pretty=TRUE, auto_unbox=TRUE)
secret = jsonlite::base64_enc(paste(client_id, client_secret, sep = ":"))
req = httr::POST(url, 
             httr::add_headers(
               "Authorization" = paste("Basic", gsub("\n", "", secret)),
               "Content-Type" = "application/json; charset=UTF-8"),
             body = request_body,verbose()
);
content(req)

然后我收到以下错误消息：

"missing parameters: {client_id, client_secret}"

有谁知道我的代码或步骤有什么问题？非常感谢！

标签： rapiposthttr