1. Learn
    2. /
  2. Курси
    3. /
  3. Аналіз тональності в R
Connected

Вправа

Радарна діаграма

Пам'ятаєте «колесо емоцій» Плучика (Plutchik)? Лексикон NRC містить 8 емоцій, що відповідають першому кільцю колеса. Раніше ви створювали comparison.cloud() для 8 базових емоцій. Тепер у цій вправі ви побудуєте радарну діаграму, подібну до колеса.

radarchart — це двовимірне представлення багатовимірних даних (щонайменше 3). У нашому випадку на графіку відображається підрахунок різних емоцій для книжки. Використовуючи радарну діаграму, ви можете одночасно переглядати всі 8 емоцій.

Як і раніше, ми завантажили лексикон «nrc» як nrc і moby_huck — об'єднану tidy-версію «Мобі Діка» та «Пригод Гекльберрі Фінна».

У цій вправі ви знову використаєте заперечений grepl(), щоб прибрати емоційні класи "positive|negative" з графіка. Ось нагадування:

object <- tibble %>%
  filter(!grepl("positive|negative", column_name))

Ця вправа знову використовує pivot_wider(), який переставляє підраховані емоційні слова. Для нагадування розгляньмо сирі дані datacamp.

people food like
Nicole bread 78
Nicole salad 66
Ted bread 99
Ted salad 21

Якщо застосувати pivot_wider() як у datacamp %>% pivot_wider(names_from = people, values_from = like), дані виглядатимуть так:

food Nicole Ted
bread 78 99
salad 66 21

Інструкції 1/2

undefined XP
    1
    2
  • Перегляньте рядки з 945 до 950 у moby_huck, використовуючи квадратні дужки.
  • Створіть scores, передавши moby_huck через конвеєр до [inner_join()].(https://www.rdocumentation.org/packages/dplyr/topics/join) з nrc. Укажіть параметр by як "term = "word".
  • Перезапишіть scores, передавши його далі в filter(). Усередині filter() застосуйте заперечений grepl() з шаблоном "positive|negative" до sentiment column.
  • Застосуйте ще один %>%, використовуючи pivot_wider() разом із names_from = book, values_from = n, values_fill = 0.