Scoruri de sentiment
În cartea Animal Farm, trei porci principali sunt responsabili pentru evenimentele din carte: Napoleon, Snowball și Squealer. De-a lungul cărții, aceștia răspândesc idei de rebeliune și îi îndeamnă pe ceilalți animale să preia ferma de la domnul Jones – proprietarul fermei.
Using the sentences that mention each pig, determine which character has the most negative sentiment associated with them. The sentences tibble contains a tibble of the sentences from the book Animal Farm.
Acest exercițiu face parte din cursul
Introducere în Prelucrarea Limbajului Natural în R
Instrucțiuni pentru exercițiu
- Folosește funcția
grepl()pentru a filtra propozițiile care menționează doar numele fiecărui porc. - Folosind
inner_join(), unește scorul de sentiment din lexiconulafinn. - Rezumă rezultatele calculând suma coloanei
score.
Exercițiu interactiv practic
Încearcă acest exercițiu completând acest cod de exemplu.
# 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))
}