401 未经授权的错误 Binance API in r

401 Unauthorized error Binance API in r

我正在尝试使用 RStudio 通过 Binance API 创建一个新订单。

我找到了 Binance 官方 API 文档并发现我应该使用:

POST /api/v3/order (HMAC SHA256).

以下脚本无法运行并给出状态代码:HTTP/1.1 401 Unauthorized

key <- "*[my key]*"
secret <- "*[my secret key]*"
url='https://api.binance.com/api/v3/order'
timestamp <- as.character(jsonlite::fromJSON(content(GET('https://api.binance.com/api/v1/time'), "text"))$serverTime + 999)
query <- list( "symbol" = "XLMBTC", "side" = "BUY", "type" = "MARKET", "quantity" = 10, "recvWindow" = 5000, "timestamp" = timestamp )
signature <- digest::hmac(key = secret, object = paste(names(query), query, sep = "=", collapse = "&"), algo = "sha256")
POST(url, add_headers("X-MBX-APIKEY"= key), query = c(query, signature = signature), verbose())

我的编码有问题吗?我以前试过一次,然后效果很好。但是,现在我想不出一个有效的脚本。

在这里您可以找到关于币安的文档API: https://github.com/binance-exchange/binance-official-api-docs/blob/master/rest-api.md

有人可以帮我吗?

已经解决了。我检查了这个网站的解决方案: https://gunbot.shop/error-response-code-400-on-binance-how-to-fix/

问题是我的 API 和 SECRET 密钥坏了。