Czarnoksiężnik z krainy NRC

Na koniec przyjrzysz się leksykonowi NRC, który przypisuje słowom etykiety wielu różnych stanów emocjonalnych. Pamiętasz koło emocji Plutchika? Leksykon NRC taguje słowa zgodnie z 8 emocjami Plutchika oraz kategoriami pozytywne/negatywne.

W tym ćwiczeniu pojawi się nowy operator, %in%, który sprawdza, czy elementy jednego wektora występują w drugim. W poniższym kodzie %in% zwróci FALSE, FALSE, TRUE – ponieważ wartości 1 i 2 z some_vec nie występują w some_other_vector, natomiast 3 występuje i zwraca TRUE. Operator %in% przydaje się do wyszukiwania dopasowań.

some_vec <- c(1, 2, 3)
some_other_vector <- c(3, "a", "b")
some_vec %in% some_other_vector

Kolejnym nowym operatorem jest !. Dodanie ! przed warunkiem logicznym odwraca jego wynik. W powyższym przykładzie FALSE, FALSE, TRUE zmieni się w TRUE, TRUE, FALSE. Użyty razem z %in% pozwala wykluczyć dopasowane elementy.

!some_vec %in% some_other_vector

Przygotowaliśmy obiekt oz – uporzą dkowaną wersję Czarnoksiężnika z Oz – oraz nrc zawierający leksykon "NRC" z przemianowanymi kolumnami.

To ćwiczenie jest częścią kursu

Analiza sentymentu w R

Zobacz kurs

Interaktywne ćwiczenie praktyczne

Spróbuj tego ćwiczenia, uzupełniając ten przykładowy kod.

oz_plutchik <- oz %>% 
  # Join to nrc lexicon by term = word
  inner_join(___, by = ___("___" = "___")) %>% 
  # Only consider Plutchik sentiments
  ___(!___ %in% c("___", "___")) %>%
  # Group by sentiment
  ___(___) %>% 
  # Get total count by sentiment
  ___(total_count = ___(___))

Edytuj i uruchom kod