umgekehrte Farben in colorNumeric()

Question

Ich versuche, die Farben einer Choroplethkarte umzukehren. Ich bin mit dem Faltblatt-Paket und die colorNumeric() Funktion, hier ist der Code, der die Palette Funktion generiert:

pal <- colorNumeric(palette = "YlGnBu", domain = foo$p) 

Ich möchte so etwas tun:

pal <- colorNumeric(palette = "YlGnBu", domain = foo$p, trans='reverse') 

jemand tut weiß, wie zu tun Dies?

Answer 1

Ohne Beispiel kann ich nicht sagen, ob es mit Ihrem Code funktioniert, aber versuchen Sie dies:

library(RColorBrewer) 
palette <- brewer.pal(5, "YlGnBu") 
previewColors(colorNumeric(palette = palette, domain = 1:5), values = 1:5) 

Und umgekehrt:

palette_rev <- rev(brewer.pal(5, "YlGnBu")) 
previewColors(colorNumeric(palette = palette_rev ,domain = 1:5), values = 1:5) 

Answer 2

Wie vorgeschlagen von @Alex hier ist ein Beispiel mit rev mit einigen aktuellen Daten:

library(leaflet) 
library(mapview) 
library(RColorBrewer) 

clrs <- rev(brewer.pal(9, "YlGnBu")) 

pal <- colorNumeric(palette = clrs, domain = poppendorf[[5]][]) 

m <- leaflet() %>% addTiles() 

m %>% 
    addRasterImage(x = poppendorf[[5]], color = pal) 

Answer 3

Mindestens in Faltblatt 1.1.0+ colorNumeric eine optionale "reverse" Argument hat, so dass Sie nur tun können:

pal <- colorNumeric(palette = "YlGnBu", domain = foo$p, reverse = TRUE)