Question

预先感谢您对我的第一个堆栈溢出请求的帮助。

我正在通过Catapult Sport使用API。我现在可以使用以下语句在我的REST客户端中工作，我目前正在使用Insomnia。在此示例中，我删除了生成的访问令牌。可以帮忙翻译以下陈述吗？

curl --request POST \
  --url https://connect-us.catapultsports.com/api/v4/stats \
  --header 'authorization: Bearer <access_token>' \
   --data '{"filters": [{"name": "activity_id", "comparison": "=", "values": ["c33392e2-dba7-494b-a045-e3ffa3d1c9c8"]}], "parameters": ["total_player_load", "total_duration", "average_player_load", "explosive_efforts"],"group_by": ["athlete"]}'

使用以下R代码的变体，我不断收到400错误

base_url <- 'https://connect-us.catapultsports.com/api/v4'
filter <- '{"filters": [{"name": "activity_id", "comparison": "=", "values": ["c33392e2-dba7-494b-a045-e3ffa3d1c9c8"]}], "parameters": ["total_player_load", "average_player_load", "explosive_efforts"],"group_by": ["period", "athlete"]}'

r <- POST(url = paste0(base_url,"/stats"), 
                 add_headers(`authorization: Bearer` = access_token),
                 query = list(`data` = filter),
                 verbose()
        )
http_status(r)
content(r, as="text", encoding="UTF-8") %>% fromJSON(flatten=TRUE) %>% as_tibble()

R-帮助将cURL语句转换为R httr

0 个答案: