如何在 Rpy2 中使用 lattice 并将结果保存为 pdf？

Question

我正在关注 rpy2 的文档 (http://rpy.sourceforge.net/rpy2/doc-2.1/html/graphics.html?highlight=lattice)。我可以使用 rpy2 中的lattice 成功地进行交互式绘图，例如：

iris = r('iris')
p = lattice.xyplot(Formula("Petal.Length ~ Petal.Width"),
                   data=iris)
rprint = robj.globalenv.get("print")
rprint(p)

rprint 显示图形。但是，当我尝试通过首先将图形保存为 pdf 时：

r.pdf("myfile.pdf")

然后我的lattice 调用，它不起作用，而是导致一个空的pdf。如果我用ggplot2 或R 基础做同样的事情（调用r.pdf，然后绘图），那么我会得到一个工作pdf。 lattice 是否需要 Rpy2 中的任何特殊内容才能将结果保存到 PDF 文件？以下也不起作用：

iris = r('iris')
r.pdf("myfile.pdf")
grdevices = importr('grDevices')
p = lattice.xyplot(Formula("Petal.Length ~ Petal.Width"),
                   data=iris)
rprint = robj.globalenv.get("print")
rprint(p)
grdevices.dev_off()

谢谢。

Answer 1

在 print 命令之后你需要一些等价的dev.off()。

也就是说，为了将你的图表保存为pdf，大致的大纲是：

pdf(...)
print(....)
dev.off()

未能调用dev.off() 将导致一个空的pdf 文件。

---

来自this source，看来rpy2 中的等价物可能是

grdevices.dev_off()

Answer 2

解决方法是使用：

robjects.r["dev.off"]()

由于某种原因，其他变体无法解决问题。