R corrplot更改数据标签

Question

我正在使用R corrplot库。看起来很棒，但是要生成一个非常好的图，我想更改相关矩阵的行和列的标签。

一种解决方案是执行以下操作：

cbak <- colnames(my.data.frame)
colnames(my.data.frame) <- c("a", "set", "of", "labels")
corrplot(cor(my.data.frame))
colnames(my.data.frame) <- cbak

但是，这看起来很奇怪和丑陋。

我想我应该使用labels一个text()函数的参数，但是我不知道怎么做。

corrplot(cor(my.data.frame), labels=c("a", "set", "of", "labels")) 

结果是

Error in text.default(pos.xlabel[, 1], pos.xlabel[, 2], newcolnames, srt = tl.srt,  : 
  invalid 'pos' value
In addition: Warning message:
In text.default(pos.xlabel[, 1], pos.xlabel[, 2], newcolnames, srt = tl.srt,  :
  NAs introduced by coercion

如何正确做到这一点？

Answer 1

在当前corrplot版本0.75中，不能使用labelsparameter，因为X和Y标签是在输入矩阵的和中的corrplot()函数内计算的。colnames()rownames()corr

我使用的方法与您建议的类似：

M <- cor(mtcars)
colnames(M) <- c("a", "set", "of", "x", "labels", 1:6)
corrplot(M, method = "color")

顺便说一句，我从我们的github问题跟踪器链接了这个stackoverflow问题：https : //github.com/taiyun/corrplot/issues/20

更新： 在当前corrplot版本0.78中，变量名中也允许使用plotmath表达式。只需在您的名称前添加字符“：”，“ =“或“ $”之一。

例：

M <- cor(mtcars)[1:5,1:5]
colnames(M) <- c("alpha", "beta", ":alpha+beta", ":a[0]", "=a[beta]")
rownames(M) <- c("alpha", "beta", NA, "$a[0]", "$ a[beta]")
corrplot(M)