常见文本挖掘可视化

使用 R 的 Bag-of-Words 进行文本挖掘

Ted Kwartler

Instructor

为何做可视化？

  • 优秀图形助力快速结论
  • 大脑高效处理视觉信息
使用 R 的 Bag-of-Words 进行文本挖掘

情境设定

tweet_topics.png

使用 R 的 Bag-of-Words 进行文本挖掘

情境设定

vector.png

使用 R 的 Bag-of-Words 进行文本挖掘

使用 tm 绘制词频图

# 将 TDM 转为矩阵
coffee_m <- as.matrix(coffee_tdm)

# 按频次汇总并排序
term_frequency <- rowSums(coffee_m)
term_frequency <- sort(term_frequency,
                       decreasing = TRUE)

# 绘制柱状图
barplot(term_frequency[1:10],
        col = "tan",
        las = 2)

tf_plot.png

使用 R 的 Bag-of-Words 进行文本挖掘

使用 qdap 绘制词频图

# 加载 qdap 包
library(qdap)

# 计算词频
frequency <- freq_terms(
    tweets$text,
    top = 10,
    at.least = 3, 
    stopwords = "Top200Words"
  )

# 绘制词频图
plot(frequency)

 

qdap_plot.png

使用 R 的 Bag-of-Words 进行文本挖掘

Passons à la pratique !

使用 R 的 Bag-of-Words 进行文本挖掘

Preparing Video For Download...