Тепловая карта для матрицы отношений с пользовательской цветовой шкалой - PullRequest
Новая
       58

Тепловая карта для матрицы отношений с пользовательской цветовой шкалой

2 голосов
/ 23 сентября 2019

Я хотел бы нарисовать тепловую карту матрицы взаимосвязей, чтобы показать расстояние от 1.

Я сделал тепловую карту, как показано ниже, но я бы хотел определить colour в соответствии с расстоянием от 1;Чем дальше число, тем светлее будет цвет. 

library(pheatmap)
pheatmap(Interrelation, cluster_rows = FALSE, cluster_cols = FALSE)

image

1 Ответ

1 голос
/ 23 сентября 2019

Это пример с цветами в диапазоне от "darkblue" до "lightblue" с более темными цветами, назначенными медиане набора данных mtcars. 

library(pheatmap)

#you can decrease 0.5 if you want finer palette
my_colors <- seq(min(mtcars),max(mtcars), by=0.5) 

my_palette <- c(colorRampPalette(colors=c("lightblue","darkblue"))(n=(length(my_colors)-1)/2),
                "darkblue",
                colorRampPalette(colors=c("darkblue","lightblue"))(n=(length(my_colors)-1)/2))

pheatmap(mtcars,  
         scale = "none",         
         cluster_cols=FALSE,    
         cluster_rows = FALSE,
         treeheight_row=0,      
         show_rownames=FALSE,   
         main = "Example",
         color = my_palette,
         breaks = my_colors)

...