Çekirdek yoğunluk grafiği

Artık çekirdek yoğunluk grafiğini öğrendiğine göre bir tane oluşturabilirsin! Unutma, bu grafik pürüzsüzleştirilmiş bir histogram gibidir ama binwidth'ten etkilenmez. Bu egzersiz, duygu (sentiment) değerlerinden bir çekirdek yoğunluk grafiği oluşturmanı sağlayacak.

Bu egzersizde 2 çekirdek yoğunluğu çizeceksin: Biri Agamemnon, diğeri de Oz Büyücüsü için. Her ikisi için de "afinn" sözlüğü ile bir inner_join() yapacaksın. "afinn" sözlüğünde terimlerin -5 ile 5 arasında puanlandığını hatırla. Veriler tidy formata geldikten sonra her iki kitap da sözlükteki kelimeleri ve karşılık gelen puanları koruyacak.

Bundan sonra, sonuçları bind_rows() kullanarak daha büyük bir veri çerçevesinde birleştirmen ve ggplot2 ile bir grafik oluşturman gerekiyor.

Görselleştirme sayesinde hangi kitabın daha olumlu veya daha olumsuz bir dil kullandığını anlayabileceksin. Dorothy'nin başına olumsuz şeyler geldiği için elbette bir örtüşme var, ancak çekirdek yoğunluğunun, Oz Büyücüsü'nde Agamemnon'a kıyasla olumlu dilin olasılığının daha yüksek olduğunu gösterdiğini çıkarabilirsin.

ag ve oz'u sırasıyla Agamemnon ve Oz Büyücüsü'nün tidy sürümleri olarak yükledik ve afinn'i tidytext "afinn" sözlüğünün bir alt kümesi olarak oluşturduk.

Bu egzersiz

R ile Duygu Analizi

kursunun bir parçasıdır

Kursu Görüntüle

Uygulamalı interaktif egzersiz

Bu örnek kodu tamamlayarak bu egzersizi bitirin.

ag_afinn <- ag %>% 
  # Inner join to afinn lexicon
  ___(___, by = c("term" = "word"))

oz_afinn <- oz %>% 
  # Inner join to afinn lexicon
  ___ 

# Combine
all_df <- ___(agamemnon = ___, oz = ___, .id = "___")

Kodu Düzenle ve Çalıştır