r - 在ggplot2中添加边框或背景以缩放图例guide_colorbar

Question

我在ggplot图表中有一个颜色条，范围从白色到红色，白色边框在白色背景上不太好看。

有没有办法为图例中的刻度线涂上不同的颜色或在渐变比例周围添加边框？

这是一个最小的示例:

df <- data.frame(x <- rnorm(10),
                 y <- rnorm(10),
                 fill <- rnorm(10))

ggplot(df, aes(x, y, fill = fill)) + 
  geom_point() + 
  scale_fill_gradient(low = 'white', high = 'red')

Answer 1

在最新的ggplot2(开发版本，将以2.3版本发布)中，现在可以使用:

# devtools::install_github("tidyverse/ggplot2") # do this once
library(ggplot2)
df <- data.frame(x <- rnorm(10),
                 y <- rnorm(10),
                 fill <- rnorm(10))

ggplot(df, aes(x, y, fill = fill)) + 
  geom_point() + 
  scale_fill_gradient(low = 'white', high = 'red',
    guide = guide_colorbar(frame.colour = "black", ticks.colour = "black"))