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

然而这看起来很奇怪而且丑陋。

我想我应该使用 text() 函数的 labels 参数，但我不知道如何操作。

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 中，您无法使用 labels 参数，因为 X 和 Y 标签是在 corrplot() 函数内计算的来自输入 corr 矩阵的 colnames() 和 rownames()。

我正在使用与您建议的类似的方法:

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 中，变量名称中也允许使用绘图数学表达式。只需在您的姓名前添加字符“:”、“=”或“$”之一即可。

示例:

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)