可视化投诉
上一章我们得到了投诉文本的词频统计。现在用条形图把这些词频可视化。
已加载 tidyverse 和 tidytext 包。twitter_data 已完成分词,且已移除常见停用词。
本练习是课程的一部分
R 文本分析入门
练习说明
- 仅保留计数大于 100 的词。
- 基于
word_counts创建条形图,将word映射到 x 轴。 - 翻转图形坐标。
交互式实操练习
通过完成这段示例代码来试试这个练习。
word_counts <- tidy_twitter %>%
filter(complaint_label == "Complaint") %>%
count(word) %>%
# Keep words with count greater than 100
___(___)
# Create a bar plot using word_counts with x = word
ggplot(___, aes(___, ___)) +
geom_col() +
# Flip the plot coordinates
___()