如何在ggplot2中全局定义彩条指南的美学？

Posted 2023-02-16

【中文标题】如何在ggplot2中全局定义彩条指南的美学？

【英文标题】：How to globally define the aesthetics of a color bar guide in ggplot2?

【发布时间】：2021-11-22 16:42:29

【问题描述】：

我有一个带有彩条的图例。默认情况下，刻度线是白色的。我可以使用guides(fill = guide_colorbar(ticks.colour = "black") 在每个绘图中将它们更改为黑色。有没有办法以一种通用的方式进行这种修改？也许在theme_set() 或theme() 里面

library(ggplot2)

X <- 1:3
Y <- 1:3

DF <- expand.grid(X = X,
                  Y = Y)

DF$Z <- 1:9

p <-  ggplot(data = DF,
             aes(x = X,
                 y = Y,
                 fill = Z)) +
  geom_tile()

p + guides(fill = guide_colorbar(ticks.colour = "black",
                                 frame.colour = "black"))

【参考方案1】：

据我所知，刻度颜色无法全局更改，但图例周围的框架可以使用theme_set。创建一个自定义主题，然后将其设置为默认主题。

theme_Daniel <- function() 
  theme_minimal() %+replace%    #replace elements we want to change
    theme(
      legend.box.background = element_rect(color = "black")
    )


theme_set(theme_Daniel())
p