如何更改 R 中 corrplot 中特定变量的字体颜色？答案

【问题标题】：How do I change the font color of specific variables in corrplot in R?如何更改 R 中 corrplot 中特定变量的字体颜色？
【发布时间】：2021-02-25 10:43:09
【问题描述】：

如何更改特定于图像中某些变量的字体tl.col 的颜色？

我必须先创建一个变量吗？或者您可以在命令中选择列吗？

corrplot(cor(iris[,-5]), tl.col="black", tl.cex=0.8, tl.srt=70)

【问题讨论】：

标签： r r-corrplot

【解决方案1】：

tl.col 为每个变量获取一个带有颜色的向量。因此，您可以直接使用 tl.col 参数为每个变量设置颜色，如下所示：

corrplot(cor(iris[,-5]), tl.col=c("red", "red", "blue", "blue"), tl.cex=0.8, tl.srt=70)

您也可以在函数中定义颜色：

colors <- ifelse(grepl("Sepal", names(iris)[-5]), "red", "blue")
corrplot(cor(iris[,-5]), tl.col=colors, tl.cex=0.8, tl.srt=70)

# or 

corrplot(cor(iris[,-5]), tl.col=ifelse(grepl("Sepal", names(iris)[-5]), "red", "blue"),
tl.cex=0.8, tl.srt=70)

【讨论】：

谢谢@tamtam 是否可以替代按名称 grep，而不是按列号 grep？（即：红色 1:2 列，蓝色 3:4 列。在我的真实数据中，我正在处理具有不同名称的多个变量
可能有不同的解决方案。但是，如果您只需要定义几种颜色，您可以尝试以下操作：colors <- rep(NA, 4) colors[1:2] <- "red" colors[3:4] <- "blue" 使用列的长度创建一个向量并用颜色重命名元素。

【解决方案2】：

试试这个：

library (corrplot)
library(MASS)
library(calibrate)
data("iris")

corrplot(cor(iris[,-5]), cl.pos = "n", tl.pos = "n")  
textxy(0,1,labs=c("Petal.Width"),cex=0.8,offset=-0.2,col="blue")
textxy(0,2,labs=c("Petal.Length"),cex=0.8,offset=-0.2,col="blue")
textxy(4,5,labs=c("Petal.Width"),cex=0.8,offset=0,col="blue",srt=45)
textxy(3,5,labs=c("Petal.Length"),cex=0.8,offset=0,col="blue",srt=45)

textxy(0,3,labs=c("Sepal.Width"),cex=0.8,offset=-0.2,col="red")
textxy(0,4,labs=c("Sepal.Length"),cex=0.8,offset=-0.2,col="red")
textxy(2,5,labs=c("Sepal.Width"),cex=0.8,offset=0,col="red",srt=45)
textxy(1,5,labs=c("Sepal.Length"),cex=0.8,offset=0,col="red",srt=45)

基本上，您必须删除 corrplot 显示的变量名称，然后 textxy 创建标签。您必须设置位置，颜色...，这是您解决问题的捷径

【讨论】：

如果您不想删除图例栏，请忽略 cl.pos= "n" 删除它的行