ggplot2中 ggsave如何用？

问题：我将ggsave应用在pipe %>%符号中，报错！「报错信息：」

❝

Error in UseMethod("grid.draw") : "grid.draw"没有适用于"c('LayerInstance', 'Layer', 'ggproto', 'gg')"目标对象的方法

❞

查阅了资料，ggplot2中调用ggsave有以下三种：

1. 把ggplot2保存为对象，然后调用

p1 = ggplot(diamonds, aes(x=cut,y = price,colour = cut)) + geom_boxplot() 
p1

ggsave("plot.png",p1 )


保存的文件：

2. 在pipe中调用时，直接用+号，而不是%>%

ggplot(diamonds,aes(x = cut, y = price, colour = cut)) + geom_boxplot() + ggsave("plot2.png")


这里，直接用+连接ggsave，而不是%>%文件如下：

3. 用括号括起来，然后用%>%

(ggplot(diamonds,aes(x = cut, y = price, colour = cut)) + geom_boxplot()) %>%  ggsave("plot3.png",.)


这里面，用（）将ggplot作图的代码括住，它会输出到屏幕上，使用%>%将其作为对象传递给ggsave，用.表示它，写作ggsave("plot3.png",.)，即可。

保存文件：

4. 代码汇总

library(tidyverse)
data("diamonds")
head(diamonds)

# method 1
p1 = ggplot(diamonds, aes(x=cut,y = price,colour = cut)) + geom_boxplot() 
p1

ggsave("plot.png",p1 )

# method 2
ggplot(diamonds,aes(x = cut, y = price, colour = cut)) + geom_boxplot() + ggsave("plot2.png")


# method 3
(ggplot(diamonds,aes(x = cut, y = price, colour = cut)) + geom_boxplot()) %>%  ggsave("plot3.png",.)


之前作图，都是用png(),或者pdf()，调用，然后用dev.off()关掉保存，发现了ggsave保存图片很方便，真得很方便。就灌水文一篇。