将Curl转换为R编程POST函数

我正在尝试将此代码转换为R编程：

curl -v -X POST -H "X-IBM-Client-Id:YOUR_CLIENT_ID" -H "X-IBM-Client-Secret:YOUR_CLIENT_SECRET" -H "Authorization: Bearer YOUR_ACCESS_TOKEN" -H "Content-Type:application/json" -H "Accept:application/json" https://api.ibm.com/watsonanalytics/run/data/v1/datasets -d '{ "description" :"1234" , "name" :"1234" }'

但当我尝试时，它给了我一个未经授权的错误

下面是我正在使用的代码：

library(RCurl)
library(RJSONIO)
httpPOST("https://api.ibm.com/watsonanalytics/run/data/v1/datasets",
     content= c("description"="Test1",
                          "name"="Test1"),
     .opts = list(httpheader = c('Content-Type' = 'application/json', 
                                 'Accept' = 'application/json',
                                 'X-IBM-Client-Secret' = '123', 
                                 'X-IBM-Client-Id' = '123',
                                 'Authorization: Bearer'="")))

我真的很感谢你的帮助

---

谢谢

这是来自RCurl library在问题中包括您正在使用的任何库的良好实践。谢谢，我还添加了我正在使用的其他库。这是来自RCurl library的良好实践，包括您正在使用的任何库。谢谢，我还添加了我正在使用的其他库。