r - ggplot : gradient scale to diverge on specific break

Question

我有这个数据:

df <- data.frame(x = 1:10,
                 y = 1:10,
                 value = c(seq(from = 0.5, to = 3.2, length.out = 9), Inf))

我想用突出显示三个中断值的渐变色标绘制:

breaks <- c(0.5,1,3.2)

我想要 white颜色来突出我的中间突破值(即 1 )，然后其他两个在到达分布的两个尾部时增加强度。然而这将绘制

require(ggplot)
ggplot(df, aes(x,y,colour=value)) + geom_point(size=10) +
  scale_colour_gradientn(colours = c("red","white","blue"),
                         breaks = breaks, labels = format(breaks))

与 white以平均值/中值 ( 1.85 ) 为中心。我不明白宣布断点有什么意义。

Answer 1

您可以使用 scale_colour_gradient2而不是 scale_colour_gradientn :

ggplot(df, aes(x,y,colour=value)) + 
  geom_point(size=10) +
  scale_colour_gradient2(low = "red", mid = "white", high = "blue", midpoint = 1, breaks = breaks) +
  theme_bw()

这给出: