使用R'的POST请求正文中缺少方括号；s httr封装

我正在使用R包httr发送POST请求。我知道Request的主体应该是什么样子，但我无法使用httr创建它。我总是缺少一对方括号（见下文）

如何修改R代码以获得所需的结果

这是R POST代码段

cells <- c("Dimensions('Time')/Hierarchies('Time')/Elements('ABC')",
      "Dimensions('Currency')/Hierarchies('Currency')/Elements('USD')")
value <- 123

with_verbose(
  httr::POST(
    url = url,
    config = httr::config(ssl_verifypeer = FALSE, ssl_verifyhost = FALSE),
    body = list(Cells = list(`Tuple@odata.bind` = cells), Value = value),
    content_type("application/json"),
    encode = "json",
    set_cookies(...),
    handle = handle
  ) %>% httr::content()
) 

发送的实际正文：

{
   "Cells": ######### Missing bracket here #######
   {"Tuple@odata.bind":[ 
      "Dimensions('Time')/Hierarchies('Time')/Elements('ABC')",
      "Dimensions('Currency')/Hierarchies('Currency')/Elements('USD')"
   ]},
   ####### Missing bracket here #######
   "Value":"123"
}

---

您就快到了，只需将另一级别的列表添加到

单元格中即可：

库（magrittr）
图书馆（jsonlite）
单元格%
美化
#> {
#>“细胞”：{
#>         "Tuple@odata.bind": [
#>“维度（'Time'）/层次结构（'Time'）/元素（'ABC'）”，
#>“维度（'Currency'）/层次结构（'Currency'）/元素（'USD'）”
#>         ]
#>     },
#>“价值”：[
#>         123
#>     ]
#> }
#> 
列表（单元格=列表（列表(`Tuple@odata.bind`=单元格），值=值）%>%
toJSON（）%>%
美化
#> {
#>“细胞”：[
#>         {
#>             "Tuple@odata.bind": [
#>“维度（'Time'）/层次结构（'Time'）/元素（'ABC'）”，
#>“维度（'Currency'）/层次结构（'Currency'）/元素（'USD'）”
#>             ]
#>         }
#>     ],
#>“价值”：[
#>         123
#>     ]
#> }
#> 

由（v0.2.1）于2018年9月23日创建

{
   "Cells": ######### Missing bracket here #######
   {"Tuple@odata.bind":[ 
      "Dimensions('Time')/Hierarchies('Time')/Elements('ABC')",
      "Dimensions('Currency')/Hierarchies('Currency')/Elements('USD')"
   ]},
   ####### Missing bracket here #######
   "Value":"123"
}