添加网格R包的边距
我不知道如何使用grid R包为PDF打印指定页边距。
我创建了一个grid.arrange()
对象,并将其放在PDF中,如下所示:
pdf('test.pdf',11.69,8.27)
grid.arrange(textGrob('text1', gp=gpar(cex=4)),
ncol=1, main=textGrob('title', gp=gpar(cex=1.5)),
widths = c(1), heights = c(1))
dev.off()
但标题被推到了表格的最上方。 我想补充利润。 如果我添加一个textGrob
而不是标题的main=
函数,我可以将它从顶端保留,但对我来说这不是一个解决方案,因为我必须放置图形,并且它们也接近边缘。
arrangeGrob有一个视角参数,
vp = viewport(height=unit(0.8, "npc"),
width=unit(5, "cm"))
g = arrangeGrob(textGrob('text1', gp=gpar(cex=4)),
top = textGrob('title', gp=gpar(cex=1.5)),
vp=vp)
grid.newpage()
grid.rect(vp=vp)
grid.draw(g)
当我用pdf(11.69,8.27)绘制它时,我改变了这个:
vp = viewport(height=unit(8.17, "inches"), width=unit(11.59, "inches"))
g$vp = vp
grid.newpage()
grid.rect(vp=vp,gp=gpar(col="white"))
grid.draw(g)
像这样,矩形的边缘是不可见的,我有大约1毫米的边距。
链接地址: http://www.djcxy.com/p/22461.html上一篇: Add margins with grid R package
下一篇: How do you attach a new pull request to an existing issue on github?