Проблемы с репликацией Python request.post с пакетом httr в r

Это работает в Python с использованием библиотеки запросов:

plist5 = ["5021072"]

data = {"startDate": "2014-04-01", "endDate": "2014-04-01", "pnodeList": plist5}
data = json.dumps(data)
url = 'https://dataminer.pjm.com/dataminer/rest/public/api/markets/realtime/lmp/daily'

headers = {'Content-Type': 'application/json'}

response = requests.post(url, data=data, headers=headers)

Я хотел бы повторить то же самое в R, используя пакет httr. Вот что я пытался без успеха:

url <- 'https://dataminer.pjm.com/dataminer/rest/public/api/markets/realtime/lmp/daily'

response <- POST(url,  body = list(pnodeList = "5021072", 
                                   startDate = "2014-04-01",
                                   endDate = "2014-04-01"),
                 headers = list('Content-Type' = 'application/json')
                )

вот ответ, который я получаю от кода R:

Response [https://dataminer.pjm.com/dataminerui/]
  Date: 2016-02-24 15:28
  Status: 200
  Content-Type: text/html
  Size: 159 B
<!-- Plain HTML page that kicks us into the app -->

<html>
<head>
<meta http-equiv="Refresh" content="0; URL=pages/public/index.html">
</head>
</html>

> content(response)
<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" "http://www.w3.org/TR/REC-html40/loose.dtd">
<!-- Plain HTML page that kicks us into the app --><html><head><meta http-equiv="Refresh" content="0; URL=pages/public/index.html"></head></html>

Любое руководство о том, как поступить, высоко ценится.

Источник

1 ответ

Решение

Надеюсь, кто-то может уточнить, почему следующее работает и / или как разбирать то, что было отправлено в "неправильной" версии, и то, что отправляется в этой "правильной" версии:

response <- POST(url,  body = list(pnodeList = list("5021072"), 
                                   startDate = "2014-04-01",
                                   endDate = "2014-04-01"),
                 encode = "json")
)

Это руководство по быстрому запуску привело меня к попыткам выше.

Добавление verbose() позволяет увидеть, что было отправлено:

POST(url,  body = list(pnodeList = list("5021072"), 
                       startDate = "2014-04-01",
                       endDate = "2014-04-01"),
     encode = "json",
     verbose()
)

Самым очевидным недостатком вашей первоначальной попытки было то, что в версии Python, pnodeList был list,

Источник
Другие вопросы по тегам