为什么我的ColorBrewer调色板错了？

Question

我在R中做了一个简单的散点图，当我尝试使用彩色酿酒调色板"RdBu“时，我得到了一些明显不同的东西，我不知道为什么。

以下是我的数据摘要

> summary(d$Year)
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
   1880    1914    1947    1947    1980    2014 

> summary(d$NHem)
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
-52.000 -21.500  -2.000   3.326  16.000  91.000 

> summary(d$NHem.bin)
-3 -2 -1  0  1  2  3  4  5 
 1 23 28 37 22  4  8 11  1 

当我使用命令时

ggplot(d, aes(x=Year, y=NHem, colour=NHem.bin)) + geom_point() + scale_fill_brewer(palette = "RdBu") 

我明白了

​

​

这显然不是"RdBu“。我做错什么了？？

另外，我正在创建一个bin var，这样我就可以尝试在3个不同的地块上保持相同的梯度。

既然我已经在这里，我如何扭转标度，使蓝色末端对应于更多的负数，而红色对应于更正的数字呢？

thx

Answer 1

首先，您没有映射fill美学。第二，要么映射color美学，要么指定一个具有填充的点形状：

library(ggplot2)
ggplot(mtcars, aes(wt, mpg, colour = factor(cyl))) +  
  geom_point() + 
  scale_color_brewer(palette = "RdBu") -> p1

# or
ggplot(mtcars, aes(wt, mpg, fill = factor(cyl))) +  
  geom_point(shape=21, color=NA) + 
  scale_fill_brewer(palette = "RdBu") -> p2

gridExtra::grid.arrange(p1, p2)

给出

​

​