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())
我正在尝试使用 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())