如何使用httr请求API令牌？

Question

我使用httr查询开放目标API。

我收到了我的API凭据(app_name和机密)，现在我试图通过翻译所提供的说明来请求一个令牌：

import requests  
API='https://www.targetvalidation.org/api/latest/'

jwt = requests.get(API + 'public/auth/request_token',  
                     params={'app_name':<appname>,'secret':<secret>})

print(jwt.json())  

下面是我对R和httr所做的尝试：

library(httr)
app_name <- "myappname"
secret <- "mysecret"
token <-
 GET("https://www.targetvalidation.org/api/latest/public/auth/request_token", app_name = app_name, secret = secret)
token <- GET("https://www.targetvalidation.org/api/latest/public/auth/request_token", add_headers(app_name = app_name, secret = secret))
token <- GET("https://www.targetvalidation.org/api/latest/public/auth/request_token", config = list(app_name = app_name, secret = secret))

# In all cases, this is what I get
token
# Response [https://www.targetvalidation.org/api/latest/public/auth/request_token]
#  Date: 2017-04-24 08:24
#  Status: 400
#  Content-Type: application/json
#  Size: 60 B
# {"message": {"app_name": "app name [appname] is required"}}

请求此令牌的正确httr语法是什么？

谢谢!

Answer 1

您必须将参数作为query传递，如httr快速启动中所解释的那样

token <- 
GET("https://www.targetvalidation.org/api/latest/public/auth/request_token", 
 query=list(app_name = app_name, secret = secret)
)