使用STM包绘制主题汇总图时如何自定义每个主题的展示词汇数

直接修改参数实现（最简便） #

STM包的plot.stm方法针对type="summary"类型的图表，提供了**n参数**专门控制每个主题的展示词汇数，默认值为3，你直接修改该参数为你需要的数值即可：

# 示例：每个主题展示5个词汇
plot(model.stm, type = "summary", text.cex = 1, n = 5)

将参数n设置为4即可展示4个词汇，设置为5即可展示5个词汇，完全匹配你的需求。

自定义标签方案（灵活调整标签内容） #

如果你需要进一步调整标签的格式、或者替换为自定义的主题标签，可以通过custom.labels参数传入你生成好的标签列表，示例代码如下：

# 第一步：提取每个主题的前N个高概率词，拼接为标签文本
topic_word_num <- 5 # 每个主题展示的词汇数
topic_labels <- lapply(labelTopics(model.stm, n = topic_word_num)$prob, paste, collapse = "、")
# 第二步：传入自定义标签绘图
plot(model.stm, type = "summary", text.cex = 0.9, custom.labels = unlist(topic_labels), margin = c(1,1,1,12))

小提示：如果标签过长显示不全，可以调小text.cex的数值缩小字体，或者增大margin参数的第四个值，给左侧标签预留更多显示空间。

内容的提问来源于stack exchange，提问作者J.Doe