Scores de sentiment
Dans le livre Animal Farm, trois cochons principaux sont responsables des événements du récit : Napoleon, Snowball et Squealer. Tout au long de l'histoire, ils propagent des idées de rébellion et encouragent les autres animaux à prendre le contrôle de la ferme de M. Jones, le propriétaire.
En vous basant sur les phrases qui mentionnent chacun des cochons, déterminez quel personnage a le sentiment le plus négatif associé à lui. Le tibble sentences contient un tibble des phrases tirées du livre Animal Farm.
Cette activité fait partie du cours
Introduction au traitement automatique des langues en R
Instructions de l’exercice
- Utilisez la fonction
grepl()pour filtrer les phrases qui mentionnent uniquement le nom des cochons. - À l'aide d'un
inner_join(), joignez le score de sentiment du lexiqueafinn. - Résumez les résultats en additionnant la colonne
score.
Exercice interactif pratique
Essayez cet exercice en complétant ce code d’exemple.
# Print the overall sentiment associated with each pig's sentences
for(name in c("napoleon", "snowball", "squealer")) {
# Filter to the sentences mentioning the pig
pig_sentences <- sentences[___(___, sentences$sentence), ]
# Tokenize the text
napoleon_tokens <- pig_sentences %>%
unnest_tokens(output = "word", token = "words", input = sentence) %>%
anti_join(stop_words)
# Use afinn to find the overall sentiment score
result <- napoleon_tokens %>%
inner_join(___("___")) %>%
summarise(sentiment = ___(___))
# Print the result
print(paste0(name, ": ", result$sentiment))
}