Question

我试图从netatmo工作站获取数据，我可以访问via API。我在R中使用了以下代码。

myapp   <- oauth_app("my_netatmo",key="my_netatmo_client_id",secret="my_netatmo_client_secret")
ep      <- oauth_endpoint(authorize = "http://api.netatmo.net/oauth2/authorize",access = "http://api.netatmo.net/oauth2/token")
sig_tok <- oauth2.0_token(ep,myapp, scope="read_station")

#after that I get redirected to my browser to log in and after that sig_tok contains an access token
sig     <- config(token = sig_tok)
html_get<-GET("http://api.netatmo.net/api/devicelist",sig)

html_get包含：

html_get
Response [http://api.netatmo.net/api/devicelist]
    Status: 400
    Content-type: application/json; charset=utf-8
    {"error":{"code":1,"message":"Access token is missing"}}

我做错了什么，因为＆＃34; sig＆＃34;似乎包含一个令牌：

sig$token$credentials$access_token
[1] "5**********************f|3**********************a"

有两个令牌或我错了（因为＆＃34; |＆＃34;介于两者之间）？

Answer 1

'|'在access_token中，它只是一个访问令牌。

来自文档：http://dev.netatmo.com/doc/methods/devicelist，参数名称为：“access_token”。我不知道R语言，但似乎你发送“令牌”作为参数，而不是“access_token”。它可以解释这个问题。

通过R中的Netatmo API获取数据

1 个答案: