R语言绘制自定义形状词云图

悠悠 2023-06-30 02:48 38阅读 0赞

## R语言绘制自定义形状词云图方法 ##

程序结果如下：

# 常规直接使用install.packages("wordcloud2")是无法进行自定义形状的词云图绘制，必须降低包的版本，使用之前的wordcloud2老版本原始包
    library(wordcloud2)
    batman = system.file("examples/3.png",package = "wordcloud2")
    ###读取形状图片，注意图片默认放在wordclou2的sample包中，浩彬老撕的路径如下："d:/Program Files/R/R-3.3.0/library/wordcloud2/examples/batman.png"
    wordcloud2(demoFreq, figPath = batman, size = 1,color = "black")

## R语言绘制自定义形状词云图结果 ##

![在这里插入图片描述][watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3RhbmRlbGlu_size_16_color_FFFFFF_t_70]  
.duibi ![在这里插入图片描述][watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3RhbmRlbGlu_size_16_color_FFFFFF_t_70 1]

## 为什么wordcloud2无法绘制自定义词云图 ##

**原因：包版本不兼容更新**  
wordcloud2包在2018年1月3号后就无法再进行自定义词云图绘制了，但是：将包的版本换成到之前的老版本的wordcloud2版本包是可以重新绘制自定义词云图的。可以直接官网在Old sources下载之前老版本的包然后离线安装这个包。  
![在这里插入图片描述][watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3RhbmRlbGlu_size_16_color_FFFFFF_t_70 2]  
换回新的低版本wordcloud2\_0.2.0即可绘制，旧版本包的地址：  
链接：[https://pan.baidu.com/s/1w96BVe1mbiKraTpoqtLhEg][https_pan.baidu.com_s_1w96BVe1mbiKraTpoqtLhEg]  
提取码：19e9  
![在这里插入图片描述][watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3RhbmRlbGlu_size_16_color_FFFFFF_t_70 3]

## wordcloud2包老版本安装方法 ##

安装旧版本包方法：先删除原来library中的wordcloud2包版本，然后手动从windows本地路径对包进行安装：其中，RGUI和RStudio都可以离线手动安装

#### RGUI离线安装 ####

![在这里插入图片描述][20200114174922660.png]

#### RStudio离线安装 ####

![在这里插入图片描述][watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3RhbmRlbGlu_size_16_color_FFFFFF_t_70 4]  
这次用的数据是wordcloud2的示例数据，当然我们也可以使用自定义数据

### 读取形状图片，注意图片默认放在wordclou2的sample包中，路径如下：“D:/Program Files/R/R-3.3.0/library/wordcloud2/examples/batman.png” ###

batman = system.file("examples/batman.png",package = "wordcloud2") ## batman.png图片可以放在wordclou2的examples目录下，也可以放在本地其它位置。
    wordcloud2(demoFreq, figPath = batman, size = 1,color = "black") ## demoFreq为系统自带数据集，该数据集可进行更换

其中， 绘制词云图demoFreg即为所用的数据，figPath = batman为所用图片

## 案例 ##

#### 原始图 ####

![在这里插入图片描述][watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3RhbmRlbGlu_size_16_color_FFFFFF_t_70 5]  
图：2.png

#### 词云自定义绘制结果 ####

library(wordcloud2)
    batman = system.file("examples/2.png",package = "wordcloud2")
    wordcloud2(demoFreq, figPath = batman, size = 1)

![在这里插入图片描述][watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3RhbmRlbGlu_size_16_color_FFFFFF_t_70 6]

## 对比Python绘制自定义词云图结果 ##

参考资料1——python制作词云图：[https://blog.csdn.net/moshanghuali/article/details/84667136][https_blog.csdn.net_moshanghuali_article_details_84667136]  
参考资料2——Python绘制自定义词云图：[https://blog.csdn.net/tandelin/article/details/103495605][https_blog.csdn.net_tandelin_article_details_103495605]

[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3RhbmRlbGlu_size_16_color_FFFFFF_t_70]: https://img-blog.csdnimg.cn/20200114174356962.png?x-oss-process=image/watermark,type_ZmFuZ3poZW5naGVpdGk,shadow_10,text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3RhbmRlbGlu,size_16,color_FFFFFF,t_70
[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3RhbmRlbGlu_size_16_color_FFFFFF_t_70 1]: https://img-blog.csdnimg.cn/20200114174330490.png?x-oss-process=image/watermark,type_ZmFuZ3poZW5naGVpdGk,shadow_10,text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3RhbmRlbGlu,size_16,color_FFFFFF,t_70
[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3RhbmRlbGlu_size_16_color_FFFFFF_t_70 2]: https://img-blog.csdnimg.cn/20200114174625418.png?x-oss-process=image/watermark,type_ZmFuZ3poZW5naGVpdGk,shadow_10,text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3RhbmRlbGlu,size_16,color_FFFFFF,t_70
[https_pan.baidu.com_s_1w96BVe1mbiKraTpoqtLhEg]: https://pan.baidu.com/s/1w96BVe1mbiKraTpoqtLhEg
[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3RhbmRlbGlu_size_16_color_FFFFFF_t_70 3]: https://img-blog.csdnimg.cn/20200115084856215.png?x-oss-process=image/watermark,type_ZmFuZ3poZW5naGVpdGk,shadow_10,text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3RhbmRlbGlu,size_16,color_FFFFFF,t_70
[20200114174922660.png]: https://img-blog.csdnimg.cn/20200114174922660.png
[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3RhbmRlbGlu_size_16_color_FFFFFF_t_70 4]: https://img-blog.csdnimg.cn/20200114175024694.png?x-oss-process=image/watermark,type_ZmFuZ3poZW5naGVpdGk,shadow_10,text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3RhbmRlbGlu,size_16,color_FFFFFF,t_70
[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3RhbmRlbGlu_size_16_color_FFFFFF_t_70 5]: https://img-blog.csdnimg.cn/20200115091024539.png?x-oss-process=image/watermark,type_ZmFuZ3poZW5naGVpdGk,shadow_10,text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3RhbmRlbGlu,size_16,color_FFFFFF,t_70
[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3RhbmRlbGlu_size_16_color_FFFFFF_t_70 6]: https://img-blog.csdnimg.cn/20200115091143894.png?x-oss-process=image/watermark,type_ZmFuZ3poZW5naGVpdGk,shadow_10,text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3RhbmRlbGlu,size_16,color_FFFFFF,t_70
[https_blog.csdn.net_moshanghuali_article_details_84667136]: https://blog.csdn.net/moshanghuali/article/details/84667136
[https_blog.csdn.net_tandelin_article_details_103495605]: https://blog.csdn.net/tandelin/article/details/103495605