Question

我想用自定义分辨率在R中绘制几幅图像。

示例：

par(mfrow=c(1,2))
image(1:4,1:4,matrix(0,4,4))
image(1:2,1:2,matrix(1,2,2))

而不是所有具有相同尺寸（分辨率）的图像2应该更小但仍安排在par。

我研究了ggplot，image，layout和par并尝试了几个小时但没有成功。

Answer 1

尝试使用gridExtra包，例如：

library(gridExtra)
library(ggplot2)

p1 <- ggplot() + 
 geom_rect(aes(xmin = 0, xmax = 4, ymin = 0, ymax = 4), color = "red", fill = "red")

p2 <- ggplot() + 
 geom_rect(aes(xmin = 0, xmax = 2, ymin = 0, ymax = 2), color = "orange", fill = "orange")

lay <- rbind(c(1, 1, 1, 1, NA, NA),
             c(1, 1, 1, 1, NA, NA),
             c(1, 1, 1, 1, 2, 2),
             c(1, 1, 1, 1, 2, 2))

grid.arrange(p1, p2, layout_matrix = lay)

这是一个很好的资源：https://cran.r-project.org/web/packages/gridExtra/vignettes/arrangeGrob.html

无需调整大小即可显示/绘制图像

1 个答案: