r - 在 pdf 中组合矢量和位图图形

Question

当将图像或热图绘制为 pdf 时，如下例所示，它们被保存为矢量对象，其中热图中图像或单元格中的每个像素都由一个正方形表示。即使在适度的分辨率下，这也会导致不必要的大文件，这些文件在某些​​设备上也会变得丑陋。 有没有办法让 R 只将图像区域保存为嵌入在 pdf 中的 png 或 jpg，但将文本、轴、注释等保留为矢量图形？

我之所以这么问，是因为我经常打印 R 图形，有时是在大海报上，并希望将这两个世界的精华结合起来。当然，我可以将整个图形保存为高分辨率 png，但这不会那么优雅，或者手动组合它，例如在 Inkscape但这很乏味。

my.func <- function(x, y) x %*% t(y)
pdf(file="myPlot.pdf")
image(my.func(seq(-10,10,,500), seq(-5,15,,500)), col=heat.colors(100))
dev.off()

感谢您的时间，想法和希望的解决方案!

Answer 1

使用 ?rasterImage ，或者在最近的版本中更方便 image带选项 useRaster = TRUE .

这将大大减少文件的大小。

my.func <- function(x, y) x %*% t(y)
pdf(file="image.pdf")
image(my.func(seq(-10,10,,500), seq(-5,15,,500)), col=heat.colors(100))
dev.off()

pdf(file="rasterImage.pdf")
image(my.func(seq(-10,10,,500), seq(-5,15,,500)), col=heat.colors(100), useRaster = TRUE)
dev.off()

file.info("image.pdf")$size

file.info("rasterImage.pdf")$size

image.pdf:813229 字节

rasterImage.pdf 16511 字节

在此处查看有关新功能的更多详细信息:

http://developer.r-project.org/Raster/raster-RFC.html

http://journal.r-project.org/archive/2011-1/RJournal_2011-1_Murrell.pdf