2016-02-22 15 views
2

我用ggplot2创建了很多方面图并将它们写入多页PDF文件。我添加了一些示例数据。用ggplot2和许多(> 25000)点或线编写适合打印的pdfs

reps <- 1000 
df <- data.frame(id=rep(letters[1:25], each=reps), 
       group=rep(LETTERS[1:25], each=reps), 
       x=runif(reps*25), 
       y=runif(reps*25)) 
pdf('test.pdf', width=11.69, height=8.27) 
for(i in seq(4)) { 
    p <- ggplot(df, aes(x,y, group=group)) + 
    geom_line() + geom_point() + 
    facet_wrap(~ id) 
    print(p) 
} 
dev.off() 

要查看PDF这是非常好的,但大部分时间用矢量图形这些大文件,杀了我的打印作业。

有没有办法正确处理这个问题?例如,创建PNG图像并将其保存在多页PDF中?或者,我是唯一一个在打印这些文件时遇到问题的人吗?

我知道PNG文件可能会更大,但我想打印机可以处理它比矢量图更好。

+0

也许[this](http://stackoverflow.com/a/16668596/1412059)是否相关?像这样的问题常常暗示你应该重新设计你的情节,例如考虑一个hexbin情节。 – Roland

+0

@Roland实际上,我有20个时间点和每个图100行的线图。我使用'facet_wrap'来突出显示具有99行背景的单行:-)我认为在这里没有一种重新设计的方法。其实我已经只绘制线条而没有分数。 PDF在最后的8页每页有12个方面。 – drmariod

回答