json httr 中的数组 post

json array in httr post

我正在尝试使用 httr 包在 POST 请求中传递一个 json 数组。但是由于数组的格式,我得到了 HTTP/1.1 400 Bad Request 。以下是我构建请求的方式:

decos <- list(name="ais-static-journey")
decos <- jsonlite::toJSON(decos, auto_unbox = TRUE) #Have also tried decos <- toJSON(decos, pretty = TRUE)

body <- list(mmsis=mmsis, startDate= startDate,
             endDate= endDate, decorations = decos)

r <- POST(decoratedurl,body=body, encode="json",add_headers(Authorization=auth), verbose())

我也看了this

我得到的错误主要是因为请求中的反斜杠:

"decorations":"{\"name\":\"ais-static-journey\"}"}

这需要 "decorations":[{"name":"ais-static-journey"}] 我该如何实现?

想通了。这有效:

decos <- list(list(name="ais-static-journey"))
body <- list(mmsis=mmsis, startDate= startDate,
             endDate= endDate, decorations = decos)
r <- POST(decoratedurl,body=body, encode="json",add_headers(Authorization=auth), verbose())