【问题标题】：How to keep Wordcloud layout in R如何在 R 中保持 Wordcloud 布局
【发布时间】：2018-04-12 20:21:51
【问题描述】：

我有一个包含 29 个单词的 Wordcloud，我想要有不同的图片，我可以在其中更改每个单词类别的颜色。我的问题是，每次我再次运行 Wordcloud 时，单词的位置都会改变，而我想保持它固定。有什么想法吗？

在下面的代码中，您有单词和频率列表，然后我指定了三种不同类型的颜色列表。当您运行它时，颜色会发生变化，但布局也会发生变化（即单词位于不同的位置）。

name <- c("Trump","Central bank", "Brexit", "Inflation", "Employment", "China",
   "Trade", "Bond Market", "Equity market","Economic Growth", "Tax reform",
   "Monetary Policy","ECB","FED","Macron","oil prices", "Market volatility",
   "Cyber risk", "North Korea", "Financial crisis","Fiscal Policy",
   "Emerging Markets","Political uncertainty","Saudi Arabia","Exchange rates",
   "Housing Markets","Le Pen","Merkel","Healthcare")


colorlist=c("grey","red","grey","grey","grey","grey","grey","grey","grey",
            "grey","grey","red","red","red","grey","grey","grey","grey",
            "grey","grey","grey","grey","grey","grey","grey","grey","grey","grey","grey")

# Frequency count of the words
freq=c(2044,1978,1938,1826,1722,1483,1434,1352,1343,1270,1209,1179,1114,925,
       816,762,744,654,572,545,476,466,432,406,370,326,282,243,236)

我尝试运行的代码是：

library(wordcloud)
set.seed(512)
wordcloud(name, freq, random.order=FALSE,fixed.asp=TRUE,
             colors=colorlist, ordered.colors=TRUE)

一些突出问题的示例输出：

【问题讨论】：

我最后使用了wordcloud2，它确实注意到似乎有这个问题。顺便说一句，即使使用 set.seed() 我也无法强制 wordcloud() 使用相同的布局......
您是在 R 中逐行运行代码还是一次执行整个脚本？如果您一次运行整个脚本，它应该可以工作。

标签： r layout word-cloud tag-cloud

【解决方案1】：

我无法在 Linux R 3.4.2 上重现此问题。开始一个新的 R 会话 (R --vanilla) 并重复调用以下命令每次都会生成完全相同的图

set.seed(512)
wordcloud(name, freq, random.order=FALSE, fixed.asp=TRUE, colors=colorlist, ordered.colors=TRUE)

下面是一个较小的示例，它也适用，对故障排除很有用：

set.seed(42)
wordcloud::wordcloud(letters, freq = seq_along(letters))

详情

> sessionInfo()
R version 3.4.2 (2017-09-28)
Platform: x86_64-pc-linux-gnu (64-bit)
Running under: Ubuntu 16.04.3 LTS

Matrix products: default
BLAS: /usr/lib/atlas-base/atlas/libblas.so.3.0
LAPACK: /usr/lib/atlas-base/atlas/liblapack.so.3.0

locale:
 [1] LC_CTYPE=en_US.UTF-8       LC_NUMERIC=C              
 [3] LC_TIME=en_US.UTF-8        LC_COLLATE=en_US.UTF-8    
 [5] LC_MONETARY=en_US.UTF-8    LC_MESSAGES=en_US.UTF-8   
 [7] LC_PAPER=en_US.UTF-8       LC_NAME=C                 
 [9] LC_ADDRESS=C               LC_TELEPHONE=C            
[11] LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C       

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

other attached packages:
[1] wordcloud_2.5      RColorBrewer_1.1-2

loaded via a namespace (and not attached):
[1] compiler_3.4.2 Rcpp_0.12.13   slam_0.1-40

【讨论】：

感谢您的回答！