r - heatmap.plus の RowSideColors の凡例を表示します

Question

RowSideColors でヒートマップを作成するために heatmaps.plus を使用しています。理解できない唯一のことは、RowSideColors の凡例を作成する方法です (たとえば、緑は Group1 で、黒は Group2 です)。どんな助けでも大歓迎です、ありがとう!

Answer 1

これに使用する必要がありますlegend。

library("heatmap.plus")

#Create dummy data
data <- replicate(10, rnorm(10)) 
rsc <- c("green", "green", "black", "green", "green", "black", "black", "green", "green", "black")
rsc <- cbind(rsc, rsc)
colnames(rsc) <- c("Groups", "")

#Plot
heatmap.plus(data, RowSideCol = rsc)

#Legend on position (40, 2)
legend(40, 2,legend=c("Title","","Group1","Group2"), fill=c("white", "white", "green","black"), border=FALSE, bty="n", y.intersp = 0.7, cex=0.7)