Question

我尝试通过R连接到Pocket API。我可以通过以json格式运行POST请求来轻松完成此操作：

POST /v3/get HTTP/1.1  
Host: getpocket.com  
Content-Type: application/json  

{"consumer_key":"xxx-xxxxx",  
"access_token":"aaaaa-aaaaaaaaaaaa"}

在R中我尝试使用 httr 包中的POST功能，但我无法弄清楚如何传递正确的参数：

library(rjson); library(httr)
the_url <- "https://getpocket.com/v3/get"
the_body <- toJSON(list(consumer_key = "xxx-xxxxx", access_token="aaaaa-aaaaaaaaaaaa"))
results <- POST(url=the_url, encode="json", body=the_body)

我总是得到状态＆＃34; 400 Bad Request＆＃34;。我知道该示例不可重现，但出于安全考虑，我不想共享consumer_key和access_token。

Answer 1

您确定url <- "https://getpocket.com/v3/get" body <- list(consumer_key = "xxx-xxxxx", access_token="aaaaa-aaaaaaaaaaaa") results <- POST(url, body = body) content(results)是好的吗？如果是这样，我认为你只需要改为

socket:\\.\pipe\b5c0af85-9393-4dcb-bd9a-3ba9b41ed6fb
  GET              /                              
  GET              /{param*}                      
  GET              /api/employees                 
  POST             /api/employees                 
  GET              /api/employees/{id}            
  PUT              /api/employees/{id}            
  DELETE           /api/employees/{id}            
  POST             /api/worklog                   
  GET              /login                         
  POST             /login                         
Hapi server started @ socket:\\.\pipe\b5c0af85-9393-4dcb-bd9a-3ba9b41ed6fb
150914/214730.270, [response], socket:\\.\pipe\b5c0af85-9393-4dcb-bd9a-3ba9b41ed6fb: [1;32mget[0m / {} [32m200[0m (316ms)

使用R连接到Pocket API

1 个答案: