如何使用 R 通过 TextRazor API 分析文本?

How to use R to analyze text with TextRazor API?

我是 API 的新手,希望您能帮助我。 我正在尝试通过 R 中的 httr 包向 TextRazor API 发送 POST 请求,但我没有让它工作。我做错了什么?

library(httr)
library(RCurl)    

key <- "MY API KEY"
text <- "text=Spain's stricken Bankia expects to sell off its vast portfolio of industrial holdings that includes a stake in the parent company of British Airways and Iberia"
extractors <- "&extractors=entities"

doc <- POST("https://api.textrazor.com",
 add_headers("x-textrazor-key" = key),
 body = paste0(text, extractors)
 )
 doc


Response [https://api.textrazor.com/]
  Date: 2015-11-16 14:29
  Status: 200
  Content-Type: application/json
  Size: 3.07 kB

当我 运行 此代码时,我得到状态代码 200,这很好。但不知何故,结果 (doc) 没有名为 'response'.

的列表元素

API 可以在此处找到文档 https://www.textrazor.com/docs/rest

我只是不知道我做错了什么。

非常感谢您的帮助。提前致谢。

您需要确保请求正文的格式正确编码,以便服务器可以解析它。 'httr' 包允许您传入参数列表并在内部处理编码,从而使这变得容易。以下对我有用:

doc <- POST("https://api.textrazor.com",
        add_headers("x-textrazor-key" = key),
        body = list(text=raw_text, extractors="entities"),
        encode = "form")

content(doc)$response$entities[[1]]$entityId