ggplot2在Rplots.pdf中相互覆盖

Question

我刚刚发现Rscript默认情况下，如果脚本执行某些绘图，则会Rplots.pdf生成ggplot。唯一的问题是不同的{{1}}会覆盖自己。默认绘图功能不会发生这种情况。我怎么能避免这种情况？

Answer 1

首先，一些推荐阅读：

grDevices::pdf()
ggplot2::ggsave()
grDevices::dev.*()
grDevices::Devices

现在，一个有效的例子......

require( ggplot2 )

#  Make some plots
p1 <- qplot(mpg, wt, data=mtcars, colour=cyl)
p2 <- qplot(mpg, wt, data=mtcars, size=cyl)
p3 <- qplot(mpg, wt, data=mtcars, facets=vs ~ am)

# Open device
pdf( "Test.pdf" )

# Output all plots to currently active device
print( p1 )
print( p2 )
print( p3 )

# Close device
dev.off()

显然，您可以在代码中选择将图表打印为pdf的点。