我正在使用该RPushbullet软件包从 R 向多个设备（智能手机）发送推送通知。这工作得很好。
现在：在每条新推送消息之前，我想删除以前的推送。我想通过访问 Pushsbullet 的 API 来做到这一点。可以在此处找到相应的 Pushbullet 文档（在左侧导航栏中，转到“Push”->“delete-push”），但我也将其发布在下面：
我曾尝试使用 R 的httr,RCurl和Curl包中的任何一个来实现这一点，但我没有成功。例如，我尝试了以下代码的各种更改：
library(httr)
r <- GET("https://api.pushbullet.com/v2/pushes/{device_ID}",
add_headers('Access-Token: x.X1XxXxXx1xxxX1xxxxxxXX1XxXXxXx1x'))
或者
library(RCurl)
library(RJSONIO)
postForm("https://api.pushbullet.com/v2/pushes/{device_ID}",
.opts = list(httpheader = c(Authorization = 'x.X1XxXxXx1xxxX1xxxxxxXX1XxXXxXx1x', Accept = 'application/json')))
但我总是收到类似“访问令牌丢失或无效”的回复，例如：
Response [https://api.pushbullet.com/v2/pushes/{device_ID}]
Date: 2017-01-30 09:44
Status: 401
Content-Type: application/json; charset=utf-8
Size: 176 B
状态码401表示“未授权”，即我无法将访问令牌传递给表单。
任何有关如何在 R 中访问此 Pushbullet API 的帮助将不胜感激。
编辑：
操作系统： Windows 10 家庭版，64 位
卷曲命令：
curl --header 'Access-Token: x.X1XxXxXx1xxxX1xxxxxxXX1XxXXxXx1x' https://api.pushbullet.com/v2/users/me
卷曲输出：
curl: (6) Could not resolve host: x.X1XxXxXx1xxxX1xxxxxxXX1XxXXxXx1x'
{"error":{"code":"invalid_access_token","type":"invalid_request","message":"Access token is missing or invalid.","cat":"(=^´¢Ñ¤ë´¢Ñ^)y´╝Ø"},"error_code":"invalid_access_token"}