如何更改 R 中 corrplot 中特定變量的字體顏色？

Question

如何更改特定於圖像中某些變量的字體tl.col的顏色？

我必須先創建一個變量嗎？ 或者您可以在命令中使用 select 列嗎？

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

Answer 1

試試這個：

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 創建標簽。 您必須設置 position，顏色...，這是您問題的捷徑

Answer 2

tl.col為每個變量獲取一個帶有 colors 的向量。 因此，您可以直接使用tl.col參數為每個變量設置顏色，如下所示：

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

或者，您可以在 function 中定義 colors：

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)