Быстрая оценка базовой полярности

В начале работы над проектом по анализу тональности быстрый вызов polarity() помогает сформировать ожидания и лучше понять задачу. В этом упражнении (чтобы сэкономить время) вы примените polarity() к части вектора comments, пока в фоновом режиме загружается полный объект полярности.

С помощью графика плотности ядра вы заметите, что отзывы не центрируются на 0. Как правило, это объясняется двумя причинами — так называемой «инфляцией оценок». Во-первых, социальные нормы могут побуждать людей выражаться доброжелательно, а не нейтрально. Это явление зависит от канала: саркастичные платформы, например сообщества киберспорта или социальные сети, могут давать смещение в отрицательную сторону — «дефляцию». У каждого канала свои особенности. Во-вторых, причиной может быть «тональность, основанная на признаках». В некоторых отзывах авторы пишут что-то вроде: «кровать была удобной и приятной, но кухня — грязной и неопрятной». Тональность такого отзыва охватывает несколько характеристик одновременно, что может приводить к смещению средней оценки.

В следующем упражнении вы скорректируете эту «инфляцию оценок», а пока изучите отзывы без каких-либо изменений.

Это упражнение является частью курса

Анализ тональности в R

Посмотреть курс

Инструкции к упражнению

Создайте объект practice_pol, вызвав polarity() для первых шести отзывов: bos_reviews$comments[1:6].
Просмотрите возвращённый объект полярности, вызвав practice_pol.
Вызовите summary() для practice_pol$all$polarity — это позволит получить общую полярность по всем 6 комментариям.
Мы также загрузили более крупный объект полярности для всех 1000 комментариев — он называется bos_pol. Теперь примените summary() к нужному элементу списка, который возвращает все оценки полярности объекта bos_pol.
Пример кода содержит столбчатую диаграмму и график плотности ядра, почти готовые к выводу. Вам нужно указать фрейм данных, представляющий все оценки. Подсказка: на предыдущем шаге polarity является столбцом этого фрейма данных.

Интерактивное практическое упражнение

Попробуйте выполнить это упражнение, дополнив этот пример кода.

# Practice apply polarity to first 6 reviews
practice_pol <- ___

# Review the object
___

# Check out the practice polarity
___

# Summary for all reviews
___

# Plot Boston polarity all element
ggplot(___, aes(x = polarity, y = ..density..)) + 
  geom_histogram(binwidth = 0.25, fill = "#bada55", colour = "grey60") +
  geom_density(size = 0.75) +
  theme_gdocs()

Редактировать и запускать код