Invocación de Cognitive Services desde R


Los servicios cognitivos de Microsoft son muy poderosos, ofrecen varias opciones de análisis, una de ellas es el análisis de texto y clasificación de sentimiento.

Los servicios pueden ser invocados desde distintas plataformas y lenguajes de programación tales como C# o Java, en este artículo vamos a mostrar cómo invocar los servicios desde lenguaje R.


# Se cargan las bibliotecas para poder invocar los servicios cognitivos por medio de http y para poder formatear los datos en formato JSON y así poder hacer la invocación al servicio correspondiente 
library(httr)
library(jsonlite) 
cognitive_request <- span=""> data.frame(
language = c("es", "es"),
id = c("1", "2"),
text = c("Que enojado que estoy", "Todo es muy bueno"))

# Convertir el data frame de R (Dataframe) al formato del request(JSON)

cognitive_request_json <- span=""> toJSON(list(documents = cognitive_request), auto_unbox = TRUE)

# Invocacion del API

result <- span=""> POST("https://westus.api.cognitive.microsoft.com/text/analytics/v2.0/sentiment",
body = cognitive_request_json,
add_headers(.headers = c("Content-Type" = "application/json", "Ocp-Apim-Subscription-Key" = "aqui va el key de su suscripcion")))
Output <- span=""> content(result)

# Salida de evaluacion en espanol
OutputCognitiva
## $documents
## $documents[[1]]
## $documents[[1]]$score
## [1] 0.03276695
## 
## $documents[[1]]$id
## [1] "1"
## 
## 
## $documents[[2]]
## $documents[[2]]$score
## [1] 0.6808149
## 
## $documents[[2]]$id
## [1] "2"
## 
## 
## 
## $errors
## list()

Comments

Popular posts from this blog

Desempeño de SQL Server 2008 R2 y Max Worker Threads

Cómo identificar consultas más pesadas en SQL Server

SQL Server La longitud de los datos LOB (2200100) que se van a replicar excede el máximo configurado 65536.