如何通过以下参数使用RCurl

Question

I need to know how to write this parameters with RCurl:

curl -v -X PUT -H "X-IBM-Client-Secret:YOUR_CLIENT_SECRET" -H "X-IBM-Client-Id:YOUR_CLIENT_ID" -H "Content-Type: application/json" -d '{"clientName": "The Sample Outdoors Company", "redirectURIs": "https://example.com:5443", "ownerName": "John Smith", "ownerEmail": "John.Smith@example.com", "ownerCompany": "example.com", "ownerPhone": "555-123-4567"}' https://api.ibm.com/watsonanalytics/run/oauth2/v1/config

I really appreciate your help.

Answer 1

You can use it like this:

library(RCurl)
library(RJSONIO)

httpPUT("https://api.ibm.com/watsonanalytics/run/oauth2/v1/config",
        content = toJSON(list('clientName' = "The Sample Outdoors Company", 'redirectURIs' = "https://example.com:5443", "ownerName" = "John Smith", "ownerEmail" = "John.Smith@example.com", "ownerCompany" = "example.com", "ownerPhone" = "555-123-4567")),
        .opts = list(httpheader = c('Content-Type' = 'application/json', 'X-IBM-Client-Secret' = 'YOUR_CLIENT_SECRET', 'X-IBM-Client-Id' = 'YOUR_CLIENT_ID')))

Instead of toJSON you can pass just a string.