2016-07-06 1 views
6

私はchoroplethマップの色を逆にしようとしています。私は、リーフレットのパッケージとcolorNumeric()機能を使用して、ここではパレットの機能を生成するコードがあるのです:colourNumeric()内の逆の色

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

私はそのような何かをしたいと思います:

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

誰が行う方法を知っていますこの?

+1

をあなたは、再現性の例を提供することはできますか? – Alex

+0

'pal [length(pal):1]'は動作しますか? – Robert

+2

[ベクトルを逆順に並べ替える方法]の複製がありますか?(http://stackoverflow.com/questions/18933441/how-to-reverse-order-a-vector) – Jota

答えて

5

例がないと私はそれはあなたのコードで動作するかどうか教えてくれますが、この試すことができません。

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

enter image description here

とリバース:提案されているよう

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

enter image description here

+0

これはうまくいきます!ありがとうございました。 –

1

を@Alexによってここにはを使用した例がありますいくつかの実際のデータと:

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) 
+0

犯罪は意図されていません!私はまだ私の答えを入力しようとしている間あなたの答えを提供している必要があります...私はあなたのことを認識するために私の編集しました。 – TimSalabim

0

は、少なくともリーフレットに1.1.0+ colorNumericは、オプションのはあなただけで行うことができますので、引数を「逆転」しています

pal <- colorNumeric(palette = "YlGnBu", domain = foo$p, reverse = TRUE) 
関連する問題