在同一圖中繪制多個Corrplot（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列） 。