在包含 "legend.title = element_blank()" 的主题中显示颜色图例

Showing colour legend in a theme containing "legend.title = element_blank()"

我正在使用 ggthemes "theme_exel_new" 主题进行绘图,它通过函数中的代码 legend.title = element_blank() 隐藏了颜色图例的标题。我试图通过添加 theme_excel_new(legend.title = waiver())、返回未使用的参数错误以及通过 scale_color_viridis(name = "M") 指定一个比例来恢复标题,这完全没有效果。

有什么方法可以取回标题吗?

代表:

library(ggplot)
library(ggthemes)
ggplot(mtcars, aes(mpg, disp, colour = gear)) +
geom_point() +
theme_excel_new() 

您可以用theme()再次覆盖主题。

library(ggplot)
library(ggthemes)
ggplot(mtcars, aes(mpg, disp, colour = gear)) +
  geom_point() +
  theme_excel_new()  +
  theme(
    legend.title = element_text()
  )