Wie wird die Farbe der Zeilenlegende in der Heatmap umgekehrt?

Question

Ich möchte die Standard-Annotations für Zeile umkehren:

library(NMF) #any other packages for this task are welcome 
car<-cars 
car$p<-sample(1:600, 50)*0.0001 
aheatmap(as.matrix(cars[,1:2,drop=FALSE]),annRow =car[,"p",drop=FALSE]) 

Wie Sie in der Zeile Anmerkung sehen können, stellt die 0 weiße Farbe und größere Anzahl der tiefere Grün. Ich würde gerne das kleinere p sehen, das tiefer grün (oder grau).

Außerdem, wenn das möglich ist, würde das p größer als 0,05 nur weiße Farbe präsentieren.

Es ist wirklich eine Herausforderung für mich. Vielen Dank für weitere Hilfe oder Kommentare.

Answer 1

Sie können die Farben mit dem Parameter annColors ändern. Dies kehrt die Reihenfolge der grün-weiß:

aheatmap(as.matrix(cars[,1:2,drop=FALSE]),annRow =car[,"p",drop=FALSE], annColors="-Greens") 

Um etwas über p zu machen = .05 weiß, könnten Sie Ihre Daten Teilmenge etwas über diesem Wert zu machen NA und das gleiche tun Färbung:

car$p[car$p>.05]<-NA 
aheatmap(as.matrix(cars[,1:2,drop=FALSE]),annRow =car[,"p",drop=FALSE], annColors="-Greens")