设置guide_colorbar的默认特征

Question

我正在尝试为ggplot2中的guide_colorbar设置一些默认值。以与您可以设置默认主题相同的方式，我希望能够设置默认的barheight，frame.color等。现在，我必须复制并粘贴相同的{{1} }对于每个ggplot对象，似乎效率很低！

我对此感到很困惑，在主题中找不到任何颜色栏选项。我可以设置默认的图例特征，例如图例高度，但这将适用于所有图例，而不仅仅是颜色条。我已经编写了自己的guide_colorbar()函数，该函数具有所需的属性，但理想情况下，我想更改默认值，以使任何呈现的颜色条（例如，由scale_color_me呈现）都具有更新后的默认值

scale_color_viridis

library(tidyverse)

diamonds %>% 
  sample_n(1000) %>% 
  ggplot(aes(price, carat, color = depth)) + 
  geom_point() + 
  labs(title = "fine")

^{由reprex package（v0.2.1）于2019-03-29创建}

喜欢使用diamonds %>% sample_n(1000) %>% ggplot(aes(price, carat, color = depth)) + geom_point() + scale_color_gradient( low = "white", high = "tomato", guide = guide_colorbar( frame.colour = "black", barheight = 15, frame.linewidth = 2, ticks.colour = "black", ticks.linewidth = 2 ) ) + labs(title = "better") 来自定义颜色栏是多么容易，但是要在每个绘图中复制和粘贴很多代码！有什么想法吗？