Analisis de Sentimiento Himno

library(readtext)
library(syuzhet)
library(RColorBrewer)
library(wordcloud)

Ejercicio 6: Analisis de sentimientos

texto <- readtext("C:\\Users\\eleyva1\\OneDrive - Steelcase Inc\\Documents\\LIT TEC\\himno.txt")
texto_palabras <- get_tokens(texto)
emociones_df <- get_nrc_sentiment(texto_palabras, language = "spanish")
barplot(colSums(prop.table(emociones_df[, 1:8])))

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

wordcloud(words=texto_palabras, min.freq = 1)

## Loading required namespace: tm

Conclusiones

Como se puede observar en la primera grafica la emocion que predomina en el Himno Nacional Mexicano es el miedo. Por otra parte, las otras dos graficas no ayudan a complementar el analisis donde el eje vertical indica un valor numérico asignado a la emoción expresada en cada parte del himno. Un valor negativo podría indicar un sentimiento triste o negativo, mientras que un valor positivo podría indicar alegría o optimismo. Por otro lado, los ejes horizontales representan el tiempo narrativo, es decir, el progreso de la historia a lo largo del himno. En conclusion, se puede afirmar que el sentimiento general del himno es bastante neutral o tiene pocas variaciones extremas de emoción.Asimismo, en el himno no hay momentos de gran euforia o tristeza a lo largo del himno.