r - Corrplot 标签打印

Question

这可以被认为是我之前的问题的连续体 - R - corrplot 相关矩阵除法- 所以让我们在这里也使用相同的示例数据。

df <- data.frame(x1 = rnorm(20), x2 = rnorm(20), x3 = rnorm(20),
                 x4 = rnorm(20), x5 = rnorm(20), x6 = rnorm(20),
                 x7 = rnorm(20), x8 = rnorm(20), x9 = rnorm(20),
                 x10 = rnorm(20), x11 = rnorm(20), x12 = rnorm(20))
cormatx <- cor(df)
corrplot(cormatx, method = "color")

现在我可以通过添加来改变标签的位置tl.pos = ...，根据包手册，它只接受“lt”、“ld”、“td”、“d”或“n”作为参数。它们分别是“左和上”、“左和对角线”、“上和对角线”、“对角线”和“NULL”。据我所知，所有涉及“对角线”选项的论点甚至都不适用于method = "color".

有没有办法只打印顶部标签？我试过tl.pos = "t"了，没有任何运气。我认为该参数不受支持，因此它返回“默认值”。

Answer 1

您可以尝试以下技巧：

df <- data.frame(x1 = rnorm(20), x2 = rnorm(20), x3 = rnorm(20),
                 x4 = rnorm(20), x5 = rnorm(20), x6 = rnorm(20),
                 x7 = rnorm(20), x8 = rnorm(20), x9 = rnorm(20),
                 x10 = rnorm(20), x11 = rnorm(20), x12 = rnorm(20))
cormatx <- cor(df)
rownames(cormatx) <- rep(" ", NROW(cormatx)) # hack
corrplot(cormatx, method = "color")