El análisis de sentimientos es una herramienta

dentro del “Machine Learning” para medir respuestas

emocionales acerca de un texto.

Las 8 emociones son: Ira Anticipación Asco Miedo Alegría Tristeza Sorpresa Confianza

Las 2 tendencias de las emociones son: Positiva o Negativa

Instalar paquetes y llamar librerias

#install.packages("readtext")
library(readtext)
## Warning: package 'readtext' was built under R version 4.4.1
#install.packages("syuzhet")
library(syuzhet)
## Warning: package 'syuzhet' was built under R version 4.4.1
#install.packages("RColorBrewer")
library(RColorBrewer)
#install.packages("wordcloud")
library(wordcloud)
## Warning: package 'wordcloud' was built under R version 4.4.1
#install.packages("tm")
library(tm)
## Warning: package 'tm' was built under R version 4.4.1
## Cargando paquete requerido: NLP
## Warning: package 'NLP' was built under R version 4.4.1

Importar la base de datos

#file.choose()
texto <- readtext("himno.txt")
texto_palabras <- get_tokens(texto)
emociones_df <- get_nrc_sentiment(texto_palabras, language = "spanish")

#Graficar

barplot(colSums(prop.table(emociones_df[, 1:8])))

sentimientos <- (emociones_df$negative*-1) + emociones_df$positive
simple_plot(sentimientos)