腐蚀图标签打印

Question

这可以被认为是我之前的问题的连续统一体 - - 所以让我们在这里也使用相同的示例数据。

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" 作为参数。它们分别是 "left and top"、"left and diagonal"、"top and diagonal"、"diagonal" 和 "NULL"。据我所知，所有涉及 "diagonal" 选项的参数甚至不适用于 method = "color".

有没有办法只打印最上面的标签？我尝试了 tl.pos = "t"，但没有成功。我认为这个论点不被支持所以它返回 "default".

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")

腐蚀图标签打印

Corrplot label printing

r

plot

r-corrplot

user-customization