在 R 中将 cURL 转换为 httr

与 Zendesk API 通信时，我在将 cURL 请求转换为 httr post 请求时遇到问题。 我已成功从 API 中提取数据，但到目前为止发布数据存在问题。

我已经与 Zendesk 的 API 支持人员交谈过，但不幸的是，他们没有任何 R 经验，因此无法告诉我我的脚本是否错误。

我得到的 cURL 示例如下（所有敏感信息均已替换）：

curl https://{subdomain}.zendesk.com/api/v2/nps/surveys/{survey_id}/invitations.json  -d '{"invitation": {"recipients": [{"name": "Ed C", "email": "[email protected] /cdn-cgi/l/email-protection", "language": "en-US"}]}}' 
    -H "Content-Type: application/json" 
    -v -u {your_email}/token:{your_api_token} -X POST

我的 cURL 知识非常有限，但我相信我正在使用以下脚本正确联系 API（同样，所有敏感信息都被替换）：

r2 <- POST('https://{subdomain}.zendesk.com/api/v2/nps/surveys/{survery_id}/invitations.json'
          ,add_headers(Authorization="Basic {api_key}")
          ,body  ='{"invitation": {"recipients": [{"name": "Ed C", "email": "[email protected] /cdn-cgi/l/email-protection", "language": "en-US"}]}}'
          ,encode='json'
)

我反复搜索了 Stack Overflow 以及其他来源，但到目前为止还没有找到适用于我的问题的情况。

提前致谢。

经过多次尝试和错误，我设法通过添加解决了我的问题'content_type_json()'。我不是 100% 确定为什么这会起作用，所以如果有人想澄清，我将不胜感激。

完整代码请参见下面：

r2 <- POST('https://{subdomain}.zendesk.com/api/v2/nps/surveys/{survery_id}/invitations.json'
              ,add_headers(Authorization="Basic {api_key}")
              ,content_type_json()
              ,body  ='{"invitation": {"recipients": [{"name": "Ed C", "email": "[email protected] /cdn-cgi/l/email-protection", "language": "en-US"}]}}'
              ,encode='json'
    )