2016-10-01 14 views
0

發佈API中的R如何調用API發佈中的R如何具有報頭JSON體

請求URL https://westus.api.cognitive.microsoft.com/text/analytics/v2.0/sentiment

請求頭 OCP-APIM-訂閱密鑰=一些值& 的Content-Type =應用/ JSON

車身應用/ JSON

{ 
    "documents": [ 
    { 
     "language": "string", 
     "id": "string", 
     "text": "string" 
    } 
    ] 
} 

請幫忙!!!

+1

不要重新發明輪子。這個API有一個[R包](https://github.com/philferriere/mscstexta4r)。 – hrbrmstr

+0

通過不使用現有的工作API,您已經知道了R @ hrbrmstr –

+0

中的mscstexta4r。 – hrbrmstr

回答

1

這裏是例子 -

request_body <- data.frame(
language = c("en","en"), 
id = c("1","2"), 
text = c("This is wasted! I'm angry","This is awesome! Good Job Team! appreciated") 
) 

轉換請求主體(數據幀)到請求體(JSON)

request_body_json <- toJSON(list(documents = request_body), auto_unbox = TRUE) 

下面我們調用API(使用add_headers添加請求頭)

result <- POST("https://westus.api.cognitive.microsoft.com/text/analytics/v2.0/sentiment", 
body = request_body_json, 
add_headers(.headers = c("Content-Type"="application/json","Ocp-Apim-Subscription-Key"="my_subscrition_key"))) 
Output <- content(result) 

顯示輸出

輸出