Duygu puanları
Hayvan Çiftliği kitabında, kitabın olaylarından üç ana domuz sorumludur: Napoleon, Snowball ve Squealer. Kitap boyunca isyan fikirlerini yayıyor ve diğer hayvanları çiftliğin sahibi Bay Jones’tan çiftliği devralmaya teşvik ediyorlar.
Her bir domuzdan bahseden cümleleri kullanarak, hangi karakterle en çok olumsuz duygu ilişkilendirildiğini belirle. sentences tibble’ı, Hayvan Çiftliği kitabındaki cümlelerden oluşan bir tibble içerir.
Bu egzersiz, kursun bir parçasıdır
R ile Doğal Dil İşlemeye Giriş
Egzersiz talimatları
- Yalnızca domuzların adını içeren cümlelere filtrelemek için
grepl()fonksiyonunu kullan. - Bir
inner_join()ileafinnsözlüğünden duygu puanını birleştir. - Sonuçları
scoresütununu toplayarak özetle.
Uygulamalı etkileşimli egzersiz
Bu egzersizi bu örnek kodu tamamlayarak deneyin.
# 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))
}