R返回corrplot作为对象

Question

corrplot 绘制相关矩阵,但它不返回图形对象(grob)

我想在一个页面上绘制几个相关矩阵.对于普通图,我会grid.arrange从gridExtra包中使用.但是由于corrplot只打印并且没有返回对象,我无法看到如何执行此操作.

是否有解决方法或更好的替代方案corrplot？

Answer 1

最近的gridGraphics包可能会按照你的要求做:将图作为grob返回.

mat <- matrix(rnorm(100), ncol=10)
library(corrplot)
corrplot(cor(mat))

library(gridGraphics)
grab_grob <- function(){
  grid.echo()
  grid.grab()
}

g <- grab_grob()
library(gridExtra)
grid.newpage()
grid.arrange(g,g,g,g)

Answer 2

有旧备用数据库par(mfrow=c(x, y)),x您希望绘制的行数和y列数.然后它会在您调用图表时发布,然后向下发布.

par(mfrow = c(2, 2))
corrplot(cor(mat1))
corrplot(cor(mat2))
corrplot(cor(mat3))
corrplot(cor(mat4))

par(mfrow = c(1, 1)) #To clear layout

将绘图为

Mat1 | Mat2
-----------
Mat3 | Mat4