Как разместить colokey справа и увеличить его в heatmap.2?

Question

Я использую heatmap.2 для получения треугольной карты тепла (где верхняя часть матрицы удаляется).

Я использовал этот код: my_data_t <- t( as.matrix(my_data) )

`cor.matrix <- cor( my_data_t, method = "spearman")`

`cor.matrix[upper.tri( cor.matrix )] <- NA`

`my.col <- c( "blue", "green", "yellow", "orange", "red" )`

`my.breaks <- c( 0, 0.2, 0.6, 0.8, 1 )`

`hm2 <- heatmap.2( cor.matrix, scale="none", Rowv=NA, Colv=NA, 
                  col=my.col, breaks=my.breaks, margins(5,5),
                  cexRow=0.5,cexCol=1.0,key=TRUE,keysize=1.5, 
                  trace="none")`

my_data было что-то вроде этого: my_data <- "Taxon NO8.4 NO6.1 NO7.3 NO9.4 N09.7 a 0.1 0.05 0.01 0.2 0.06 b 0.0 0.8 0.8 0.0 0.0 c 0.7 0.0 0.0 0.0 0.1 d 0.0 0.01 0.08 0.0 0.09 e 0.0 0.0 0.0 0.0 0.0 f 0.09 0.05 0.01 0.04 0.0 g 0.07 0.7 0.0 0.01 0.08"

Теперь мне бы хотелось, чтобы цветная клавиша была справа от тепловой карты, и я бы хотела, чтобы она была больше (как полоса справа от тепловой карты, пока эта). Это возможно в heatmap.2 функция??

Я также пытался использовать legend() команда, но мне кажется, что он может генерировать только легенды коробки, с одной коробкой для каждого цвета, так что нет уникальной боковой панели, верно?

Answer 1

Смотрите ответ здесь: Перемещение цветовой клавиши в R heatmap.2 (функция пакета gplots)

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