在ggcor图中更改字体样式

Question

是否有一种方法来更改相关字体样式，以显示在使用ggcorplot创建的相关图中？我知道可以改变相关的大小和颜色，但我很难找到改变字体样式的解决方案。

例如，drat和mpg之间的相关性是0.7，我希望将0.7转换成不同的字体样式(例如，从Arial到Times )。

library(ggcorrplot)

# Compute a correlation matrix
data(mtcars)
corr <- round(cor(mtcars), 1)

# Compute a matrix of correlation p-values
p.mat <- cor_pmat(mtcars)

# Compute a plot
ggcorrplot(corr,
           hc.order = TRUE,
           type = "lower",
           lab = TRUE)

其结果如下所示：

​

Answer 1

一种选择是对ggcorrplot返回的ggcorrplot对象执行一些哈克或操作，即您可以重写添加文本标签的geom_text层(这是第二层)使用的默认mapping，例如，下面我使用ifelse将drat和mpg的fontface设置为“粗体”，否则：

library(ggcorrplot)
#> Loading required package: ggplot2

data(mtcars)
corr <- round(cor(mtcars), 1)

p <- ggcorrplot(corr,
  hc.order = TRUE,
  type = "lower",
  lab = TRUE
)

p$layers[[2]]$mapping <- aes(Var1, Var2,
  fontface = ifelse(Var2 == "mpg" & Var1 == "drat", "bold", "plain")
)

p

​

​