Как включить несколько цветов в текстовые метки для матрицы корреляции в R corrplot?

Question

Поэтому я пытаюсь создать корреляционную матрицу, используя R corrplot пакет. Я хотел бы использовать два цвета в текстовых метках, чтобы показать группам переменных.

В качестве простого примера:

dat <- data.frame("Blue" = c(1:20), "Red" = sample(1:20, 20, replace = T))

dat <- as.matrix(dat)

C = rcorr(dat, type = "pearson")

corrplot(corr = C$r, order = "original", title = "Pearson Correlations", method = "color", type = "full", p.mat=C$P, insig = "blank", tl.col = "blue", addgrid.col = "darkgrey", bg = "white", cl.pos = "b", tl.pos = "tl", col = colorRampPalette(c("darkred","white","midnightblue"))(100), mar = c(4, 0, 4, 0))

я знаю это tl.col является аргументом для цвета заголовка, но я хотел бы изменить две переменные, чтобы они имели разные цвета, и не могу найти эту опцию в документах. Это возможно?

Answer 1

Вы можете просто использовать функцию объединения c() для ввода разных цветовых меток для разных столбцов.

library(corrplot)
library(Hmisc)

# defining dataframe
dat <-
  data.frame("Blue" = c(1:20),
             "Red" = sample(1:20, 20, replace = T))

# getting correlations
C = Hmisc::rcorr(as.matrix(dat), type = "pearson")

# preparing the plot
corrplot::corrplot(
  corr = C$r,
  order = "original",
  title = "Pearson Correlations",
  method = "color",
  type = "full",
  p.mat = C$P,
  insig = "blank",
  tl.col = c("blue", "red"), # different colors
  addgrid.col = "darkgrey",
  bg = "white",
  cl.pos = "b",
  tl.pos = "tl",
  col = colorRampPalette(c("darkred", "white", "midnightblue"))(100),
  mar = c(4, 0, 4, 0)
)

Создано в 2018-02-20 пакетом представлением (v0.2.0).