R语言--08保存与导出

Rita的程序bug

于 2024-03-22 19:30:00 发布

阅读量710

点赞数 6

分类专栏： R语言文章标签： r语言开发语言

本文链接：https://blog.csdn.net/Rita_rr/article/details/136865004

版权

R语言专栏收录该内容

9 篇文章 2 订阅

订阅专栏

本文介绍了如何在R语言中使用eoffice包进行可编辑的PPT导出，ggplot系列的ggsave功能，以及patchwork包实现简单且灵活的图形拼接。此外，还提到了ggpubr库在数据分析中的应用和图像导出的最佳实践。

摘要由CSDN通过智能技术生成

一、基础包作图的保存

二、神器eoffice

三、ggplot系列图(包括ggpubr)通用的简便保存 ggsave

四、拼图

五、补充

一、基础包作图的保存

二、神器eoffice

eoffice包导出为ppt,全部元素都是可编辑模式

library(eoffice)
topptx(p,"iris_box_ggpubr.pptx")

【每个点、线、字都变成了可编辑元素】

【注意：超多点的图或者超多行列的热图不适用，ppt会卡掉】

三、ggplot系列图(包括ggpubr)通用的简便保存 ggsave

library(ggplot2)
p <- ggplot(data = iris) + 
  geom_point(mapping = aes(x = Sepal.Length,
                           y = Petal.Length), 
             color = "blue")

ggsave(p,filename = "iris_box_ggpubr11.png")

导出来是图片的形式

四、拼图

R包patchwork语法简单，完美兼容ggplot2拼图比例设置简单
(1)支持直接p1+p2拼图，比任何一个包都简单
(2)复杂的布局代码易读性更强
(3)可以给子图添加标记(例如ABCD,III III IV 这样)
(4)可以统一修改所有子图
(5)可以将子图的图例移到一起，整体性特别好

【如果代码可运行却出不了图---因为画板被占用了】

使用dev.off()---关闭画板

多次运行dev.off()，到null device为止，再重新运行出图代码或dev.new()

五、补充

ggpubr 搜代码直接用，基本不需要系统学习

sthda上有大量ggpubr出的图

library(ggpubr)
p = ggboxplot(iris, x = "Species", y = "Sepal.Length",
              color = "Species", shape = "Species",add = "jitter")
p
my_comparisons <- list( c("setosa", "versicolor"), 
                        c("setosa", "virginica"), 
                        c("versicolor", "virginica") )
p + stat_compare_means(comparisons = my_comparisons,
                       aes(label = after_stat(p.signif)))