小编Hel*_*ach的帖子

如何使用scale_color_brewer修复“提供给离散比例的连续值”

我正在尝试制作全球数据异常（降水、温度等）的地图，并且需要使用不同的调色板。我的代码可以很好地运行，scale_color_viridis但它不容易用scale_color_brewer. 我想使用RdBu发散的调色板。

vars我已经尝试在函数中提供值scale_color_brewer并使用scale_fillBrewer，但我想继续使用geom_points到目前为止的绘图。

  titletext <- paste(VAR, "Response")
  expand.grid(lon, lat) %>%
    rename(lon = Var1, lat = Var2) %>%
    mutate(lon = ifelse(lon > 180, -(360 - lon), lon),
           vars = as.vector(global.array)) %>% 
    ggplot() + 
    geom_point(aes(x = lon, y = lat, color = vars),
               size = 2.0) + 
    borders("world", colour="black", fill=NA) + 
    scale_color_brewer(type="div", palette="RdBu")+
    #scale_color_viridis(na.value="white",name = VAR) +  
    theme(legend.direction="vertical", legend.position="right", 
          legend.key.width=unit(0.4,"cm"), legend.key.heigh=unit(2,"cm")) + 
    coord_quickmap() + ggtitle(titletext)

Run Code Online (Sandbox Code Playgroud)

错误信息是