Создание заказа API Binance с помощью R - PullRequest
Новая
       47

Создание заказа API Binance с помощью R

0 голосов
/ 05 декабря 2018

, пожалуйста, помогите ...:)

Я пытаюсь создать заказ через API Binance в RStudio, но не могу его создать.

Это код, который я использую: 

apiKey <- "*My API key*"
secretKey <- "*My Secret key*"

timestamp <- GET(url = "https://api.binance.com", path = "/api/v1/time")
timestamp=content(timestamp, as="parsed")
timestamp=timestamp$serverTime - 1542213129131.6

"symbol" = "BTS-BTC"
"side" = "SELL"
"type" = "MARKET"
"quantity" = 1000
"recvWindow" = 5000000000000
"timeInForce" = "GTC"


postmsg <- paste0("timestamp=", timestamp,"&recvWindow=",recvWindow,"&symbol=",symbol,
"&side=",side,"&type=",type,"&quantity=",quantity,"&timeInForce=",timeInForce)

signature <- openssl::sha256(postmsg, key=secretKey)

POST(
url = "https://api.binance.com",
path = "api/v3/order",
content_type('application/json'), add_headers(.headers = c("X-MBX- APIKEY"=apiKey)),
query=list(signature=signature), 
encode = 'json'
)

Я получаю ответ: Ответ [https://api.binance.com/api/v3/order?signature=3e70e503ca46fa86d11a3c4d1c4fa1486be78f6d9c1c09b7e05ea4ae04c303e7] Дата: 2018-12-05 14:29 Статус: 400 Тип содержимого: application / json; charset = utf-8 Размер: 95B

Но на моем счету Binance ничего не происходит: /

Что я делаю не так?

Спасибо ...

...