有没有办法在quanteda中为这个词云添加标题?
Is there a way to add a title to this word cloud in quanteda?
library(quanteda)
library(quanteda.textplots)
corpus_subset(data_corpus_inaugural,
President %in% c("Washington", "Jefferson", "Madison")) %>%
tokens(remove_punct = TRUE) %>%
tokens_remove(stopwords("english")) %>%
dfm() %>%
dfm_group(groups = President) %>%
dfm_trim(min_termfreq = 5, verbose = FALSE) %>%
textplot_wordcloud(comparison = TRUE)
我正在尝试为该情节添加标题,例如“我的第一个情节”。有没有办法为这个情节添加标题?我在文档中看不到方法,但也许有办法?
textplot_wordcloud
使用基本的 R 图形引擎来创建绘图。这意味着您可以使用图形命令来调整某些词云功能。
创建词云后,您可以使用title
或mtext
为您的词云添加标题。我使用 mtext
是因为它可以更好地控制将文本放置在绘图上的位置。使用 title
会将文本绘制在“Jefferson”上。
corpus_subset(data_corpus_inaugural,
President %in% c("Washington", "Jefferson", "Madison")) %>%
tokens(remove_punct = TRUE) %>%
tokens_remove(stopwords("english")) %>%
dfm() %>%
dfm_group(groups = President) %>%
dfm_trim(min_termfreq = 5, verbose = FALSE) %>%
textplot_wordcloud(comparison = TRUE)
mtext("my first wordcloud",
side=3,
line=3,
at=-0.07,
adj=0,
cex=1)
library(quanteda)
library(quanteda.textplots)
corpus_subset(data_corpus_inaugural,
President %in% c("Washington", "Jefferson", "Madison")) %>%
tokens(remove_punct = TRUE) %>%
tokens_remove(stopwords("english")) %>%
dfm() %>%
dfm_group(groups = President) %>%
dfm_trim(min_termfreq = 5, verbose = FALSE) %>%
textplot_wordcloud(comparison = TRUE)
我正在尝试为该情节添加标题,例如“我的第一个情节”。有没有办法为这个情节添加标题?我在文档中看不到方法,但也许有办法?
textplot_wordcloud
使用基本的 R 图形引擎来创建绘图。这意味着您可以使用图形命令来调整某些词云功能。
创建词云后,您可以使用title
或mtext
为您的词云添加标题。我使用 mtext
是因为它可以更好地控制将文本放置在绘图上的位置。使用 title
会将文本绘制在“Jefferson”上。
corpus_subset(data_corpus_inaugural,
President %in% c("Washington", "Jefferson", "Madison")) %>%
tokens(remove_punct = TRUE) %>%
tokens_remove(stopwords("english")) %>%
dfm() %>%
dfm_group(groups = President) %>%
dfm_trim(min_termfreq = 5, verbose = FALSE) %>%
textplot_wordcloud(comparison = TRUE)
mtext("my first wordcloud",
side=3,
line=3,
at=-0.07,
adj=0,
cex=1)