R-POST json与httr

我在使用时遇到了一些问题 POST() .

我不确定如何指定 body() 当json稍微复杂一点时。

下面是一个简单的例子:

POST(url = url,
     add_headers(Key = "authorization", 
          Authorization = paste("Bearer", accessToken, sep = " ")),
     body = list(Name = "Test"), encode = "json")

但当json更复杂时,例如:

{
     "Supplier": "00000000-0000-0000-0000-000000000000",
     "PurchaseOrderLines": [
     {
          "Item" : "00000000-0000-0000-0000-000000000000",
          "PurchaseOrderID" : "00000000-0000-0000-0000-000000000000",
          "QuantityInPurchaseUnits" : 5.0
     }
     ]
} 

如何为这个json代码创建一个主体?我的猜测如下:

POST(url = url,
     add_headers(Key = "authorization", 
          Authorization = paste("Bearer", accessToken, sep = " ")),
     body = list(Supplier = "00000000-0000-0000-0000-000000000000", 
                 PurchaseOrderLines = list(
                          Item = "00000000-0000-0000-0000-000000000000", 
                          PurchaseOrderID = "00000000-0000-0000-0000-000000000000",
                          QuantityInPurchaseUnits = "5.0")) 
     encode = "json")

这将返回HTML状态400,因此显然调用有问题。是我的 是正确的还是我遗漏了什么?

编辑:你可以在上面找到API文档 here .