我有两个地块(用基本图形创建)和两个数据帧,我想把它们合并到PDF中的一张纸上。我使用grid.table从我的数据帧创建一个tableGrobs。我很难格式化PDF输出。特别是,我没有成功地将所有对象保持在同一个页面上。我希望右边的窗格包含一个图,左边的面板包含另一个图,下面两个表格(横向格式)。
目前,我的代码如下所示:
library('gridExtra')
pdf("Rplots.pdf", paper = "USr", height = 8.5, width = 11)
layout(matrix(c(1,3, 2,3, 4,3), nrow = 3, ncol = 2, byrow = TRUE))
plot(myPlot1)
grid.table(df1)
plot(myPlot2)
grid.table(df2)
dev.off()I不想使用ggplot2。
发布于 2014-08-08 01:15:13
要组合base绘图和grid对象,包gridBase是有用的。
基于上面布局的一个粗略的示例
library(grid)
library(gridBase)
library(gridExtra)
layout(matrix(c(1,3, 2,3, 4,3), nrow = 3, ncol = 2, byrow = TRUE))
# First base plot
plot(1:10)
# second base plot
frame()
# Grid regions of current base plot (ie from frame)
vps <- baseViewports()
pushViewport(vps$inner, vps$figure, vps$plot)
# Table grob
grob <- tableGrob(iris[1:2,1:2])
grid.draw(grob)
popViewport(3)
# third base plot
plot(1:10)
# fourth
frame()
vps <- baseViewports()
pushViewport(vps$inner, vps$figure, vps$plot)
grid.draw(grob)
popViewport(3)这给

https://stackoverflow.com/questions/25192838
复制相似问题