使用ggpubr的ggscatterhist时ggsave()函数报错问题求助

原因分析 #

ggscatterhist()返回的是**ggscatterhist类的列表对象**，而非标准的ggplot单一绘图对象。而ggsave()的plot参数仅支持接收能被grid.draw()处理的单一绘图对象（比如标准ggplot对象），直接传入列表类型的Graph1就会触发类型不匹配的报错。

当你省略plot参数调用ggsave()时，它会默认抓取当前绘图设备上已渲染的内容——此时Graph1已经被输出到设备上，所以能正常完成保存。

是否属于bug？ #

这不算是bug，是函数设计逻辑导致的预期行为：

• ggpubr的组合绘图函数（如ggscatterhist、ggarrange）为了保留子图的独立可编辑性，返回的是包含多个子图的列表结构；
• ggsave()的plot参数是针对标准ggplot对象设计的，没有专门适配ggpubr这类组合列表对象。

解决方案 #

除了你当前使用的省略plot参数的方法，还有两种更稳妥的方式：

1. 使用ggpubr自带的ggexport()函数，专门适配其组合绘图对象：

   ggexport(Graph1, filename = "Grafico1.png", dpi = 500)
   

2. 借助gridExtra包将列表对象转换为可被grid.draw()处理的绘图对象后，再传给ggsave()：

   library(gridExtra)
   ggsave(plot = grid.arrange(grobs = Graph1), filename = "Grafico1.png", device = "png", dpi = 500)
   

内容的提问来源于stack exchange，提问作者GiacomoDB