ggplot：渐变比例以在特定中断处发散

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()

这给出：