R httr放回响

Question

我试图将一些PUT请求插入一些我在小型数据库上执行每日ETL的旧版R代码中。 这些请求会将用户添加到MailChimp中的电子邮件列表中。

我已经能够将GET请求格式化为R（特别是httr包）接受的语法：

GET（“ https://us10.api.mailchimp.com/3.0/lists/list_id_XXXXX/members/MEMBER_HASH_####### ”，查询= list（apikey ='XXXXXXXXXXXXXX'））

但是，当我尝试对PUT请求执行类似操作时，这种简单的语法无法正常工作-您不能直接通过URL传递API KEY和/或请求的参数。 如果使用与GET相同的语法，则会收到401错误。

我相信我需要使用CONFIG选项来传递API密钥（使用AUTHENTICATE或ADD_HEADERS）和BODY中的请求参数，以使PUT请求正常工作，但是我无法使语法正常工作-这给出了一个400错误：

auth <-authenticate（“ anystring”，“ XXXXXXXXXXXXXX”，type =“ basic”）parms <-'[{“ email_address”：“ some_user@domain.com”，“ status_if_new”：“ subscribed”}]]'PUT（“ https://us10.api.mailchimp.com/3.0/lists/list_id_XXXXX/members/MEMBER_HASH_#######＃“，config = auth，body = parms，encode =” json“）

如果任何人都可以向我指出一个更加出色的示例，那将是惊人的……但是，即使只是一些有关如何获取有关我的错误消息的更多信息以帮助我对语法进行故障排除的提示，也将大有帮助。

谢谢。

Answer 1

从R用户组邮件列表中获得了一些帮助...下面的代码现在可以正常工作，并将PUT请求发送到API。

auth         <- authenticate("<USER_NAME>", "<API KEY>", type = "basic")
params       <- list(email_address = email_to_add, status_if_new ="subscribed")
path         <- "https://us10.api.mailchimp.com/3.0/lists/xxxxxxxx/members/hash_email_to_add"
path         <- gsub('hash_email_to_add',digest(email_to_add,algo="md5",serialize=F),path)

PUT(url=path,
config = auth,
body = params,
encode = "json"

）