R corrplot中的標題也沒有居中和太高

Question

我正在使用corrplot來顯示相關性，但是標題在情節之上非常高，我想把它拉得更近。 我該怎么做呢？

示例數據幀：

"VADeaths" <-
  structure(c(11.7, 18.1, 26.9, 41, 66, 8.7, 11.7, 20.3, 30.9, 54.3, 15.4, 
  24.3, 37, 54.6, 71.1, 8.4, 13.6, 19.3, 35.1, 50), .Dim = c(5, 4),
  .Dimnames = list(c("50-54", "55-59", "60-64", "65-69", "70-74"),
  c("Rural Male", "Rural Female", "Urban Male", "Urban Female")))

計算相關性並可視化

library(corrplot)
cors = cor(VADeaths)

corrplot(cors,tl.col="black",title="Example Plot",mar=c(0,0,5,0),tl.offset = 1)

通過將邊距擴展到圖表上方的5，我至少可以使標題顯示在圖中，但無法弄清楚如何使標題更靠近圖並以圖表為中心而不是標簽占用的空間。

以上看起來像這樣：

我想要更像這樣的東西（忽略字體）

我的實際情節標簽要小得多，因此標簽與標題之間的間隙約為3-4厘米。 我沒有發現增加mar的價值解決了這個問題。

Answer 1

您可以使用mtext來添加標題

corrplot(cors,tl.col="black", mar=c(0,0,5,0), tl.offset = 1)
mtext("Example Plot", at=2.5, line=-0.5, cex=2)

at控制水平位置。 line控制高度。 cex的大小。 ?mtext可以看到更多選項

Answer 2

您可以使用ggplot2繪制相關圖。

首先將相關數據轉換為數據幀。

library(reshape2)
cors <- cor(VADeaths)
cor_data <- reshape2::melt(
  cors, 
  varnames = paste0("demographic", 1:2), 
  value.name = "correlation"
)

然后畫出情節。

library(ggplot2)
ggplot(cor_data, aes(demographic1, demographic2, fill = correlation)) + 
  geom_tile() + 
  ggtitle("Correlation across demographics for VA deaths")