r - 在同一图中绘制多个 corrplots (R)

Question

是否可以绘制多个 corrplot单个图中的图？

可重现的例子:

library(corrplot)
data(mtcars)
M <- cor(mtcars)

col1 <- colorRampPalette(c("#7F0000","red","#FF7F00","yellow","white", "cyan", "#007FFF", "blue","#00007F"))

corrplot(M, method="color", col=col1(20), cl.length=21,order = "AOE", addCoef.col="grey")
corrplot(M, method="square", col=col1(200),order = "AOE")
corrplot(M, method="ellipse", col=col1(200),order = "AOE")
corrplot(M, method="shade", col=col1(20),order = "AOE")

我想知道是否有一个类似于“多重绘图功能”的功能适用于此目的。我希望所有这些 corrplots 都在同一个输出中。

Answer 1

就是这样。只需使用 par(mfrow=c(2,2))在你的脚本中:

library(corrplot)
data(mtcars)
M <- cor(mtcars)

col1 <- colorRampPalette(c("#7F0000","red","#FF7F00","yellow","white", "cyan", "#007FFF", "blue","#00007F"))

#this is my only addition
par(mfrow=c(2,2))

corrplot(M, method="color", col=col1(20), cl.length=21,order = "AOE", addCoef.col="grey")
corrplot(M, method="square", col=col1(200),order = "AOE")
corrplot(M, method="ellipse", col=col1(200),order = "AOE")
corrplot(M, method="shade", col=col1(20),order = "AOE")

你就完成了:



请注意，在 par(mfrow=c(2,2))第一 2代表行和第二个 2代表列。您可以将其更改为您喜欢的任何内容。我选择这样显示您的 4 个图表，因为它看起来不错，但是如果您愿意，可以使用 par(mfrow=c(1,4)) 将它们全部放在一行中(1 行，4 列)。