Печать этикеток

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"без всякой удачи. Я думаю, что аргумент просто не поддерживается, поэтому он вернул "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")