R:为wordcloud图形/png添加标题

Question

我有一些有效的 R 代码，可以从术语文档矩阵生成标签云。

现在我想从许多文档中创建一大堆标签云，并在以后进行视觉检查。
要知道标签云图片属于哪个文档/语料库，我想为生成的图形添加一个标题。我怎么做？

也许这很明显，但我仍然是 R 图形的初学者。

我自己的语料库太大，无法在此处列出，但是可以使用此 SO 问题中的代码(结合来自 SO 用户 Andrie 的已接受答案的代码形式):
Spaces in wordcloud
我想为图片添加自定义标题和更多自定义文本，例如 this

Answer 1

wordcloud()函数填充整个图。这意味着您需要在绘图之前在图形设备上为标题保留空间。

自 wordcloud利用基本图形，您可以使用 par(mfrow=...) 来做到这一点。或 layout() .然后用 text() 创建情节标题.

我用layout()说明，改编 ?wordcloud 中的示例:

library(tm)
library(wordcloud)

x <- "Many years ago the great British explorer George Mallory, who 
was to die on Mount Everest, was asked why did he want to climb 
it. He said, \"Because it is there.\"

Well, space is there, and we're going to climb it, and the 
moon and the planets are there, and new hopes for knowledge 
and peace are there. And, therefore, as we set sail we ask 
God's blessing on the most hazardous and dangerous and greatest 
adventure on which man has ever embarked."

layout(matrix(c(1, 2), nrow=2), heights=c(1, 4))
par(mar=rep(0, 4))
plot.new()
text(x=0.5, y=0.5, "Title of my first plot")
wordcloud(x, main="Title")

这会产生: