保存马赛克图的优雅方法？

Question

我的大部分图都是用 ggplot2 制作的，ggsave 命令用一行将它们保存在它们应该在的位置。但是，使用 vcd 包的马赛克图最适合我的数据。问题：我没有收到包含以下代码的错误消息。R 说它已经保存了我的情节，但被保存的情节是我创建的最后一个 ggplot 图，而不是我想要的马赛克图。当然我可以在 RStudio 中手动保存，但我很确定有更好的方法。有任何想法吗？

Onlyaround <- subset(prepData, preposition=="around")
attach(Onlyaround)
mytable <- table(exp_group, session, result)
ftable(mytable)
mosaic(mytable, shade=TRUE, legend=TRUE, main = "Around by Group")
margin.table(mytable)
ggsave("pics/around_mosaic.png")
detach(Onlyaround) 

Answer 1

ggsave()实际上是保存 ggplots 的命令，因此它不会保存您的马赛克图也就不足为奇了。保存绘图的标准“R”方式可以正常工作：

jpeg("pics/around_mosaic.png")
mosaic(mytable, shade=TRUE, legend=TRUE, main = "Around by Group")
dev.off()