R-将带有原始正文的Postman中的GET请求转换为R

问题描述

我有一个要向GET请求中添加正文的问题。

  1. 在邮递员中,我可以轻松地将body raw json添加到“ Body”标签

enter image description here

  1. 在R中,我使用httr::GET,但找不到添加它们的任何选项。我尝试使用选项query,但返回错误500“缺少参数用户名

这是我的代码(对假数据表示抱歉):

library(httr)

api <- ".........................../users/authorize"

query <- list("username": "xxxxx","password": "xxxxxxxxxxxx")

resp <- GET(api,query = query)
stop_for_status(resp)
# Error: Internal Server Error (HTTP 500).

content(resp,type = "text",encoding = "utf-8")
# [1] "{\"status\":\"0\",\"error_code\":\"S002\",\"errors\":\"Missing param [username].\"}"

有人可以帮助我处理此案吗?非常感谢。

解决方法

尝试一下:

resp <- httr::POST(body = query,encode = "json")